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Solo Dysan garantisce che 
tutta la superficie della 
diskette sia realmente 
100% “error Lee”: un test 
esclusivo certifica le tracce 
e lo spazio tra le tracce 
assicurando prestazioni 
“error free” anche in 
presenza di 
disallineamento delle 
testine. 


Solo Dysan garantisce una 
superficie “a specchio” 
grazie alla sua avanzata ed 
unica tecnica di 
“burnishing” - questo 
risultato assicura un 
miglior segnale sulle 
tracce, una minor 
turbolenza sulle testine, 
consentendo un sicuro 
mantenimento dei dati 
dopo milioni e milioni di 
rotazioni. 


Solo Dysan garantisce, 
mediante uno speciale 
procedimento di 
lubrificazione, ottenuto 
trattando la superficie con 
il proprio esclusivo 
lubrificante DY 10, che le 
prestazioni “error free” 
siano esaltate e mantenute 
nel tempo. 


Solo Dysan garantisce, con 
il suo metodo automatico 
di controllo qualità di tutta 
la produzione (risultato di 
una tecnologia leader nel 
mondo) che ogni diskette 
prodotta sia stata 
singolarmente testata e 
certificata. 
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Salute 

Purtroppo il medico di famiglia non esiste più (ma se ce n’è ancora 
qualcuno, si affretti a usare questo programma!): vaccinazioni da un 
lato, malattie dall’altro, analisi, terapie e soprattutto costi a non finire. 
Come ricordare tutto, registrare e listare le spese mediche di tutti i 
familiari? E al momento di pagare le tasse, poi... 
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Voce 

Ora non gli manca più la parola: con questa routine in linguaggio 
macchina l’Apple può finalmente pronunciare tutto quello che volete. 


Oroscopo 

Dedicato soprattutto a chi agli oroscopi non crede, forse questo 
programma può riuscire a far cambiare loro idea... Scientificamente 
fondato, permette la creazione di una carta del cielo natale che nulla 
invidia ai grafici tracciati dai professionisti. 



Blackout 

Stabilizzatori e gruppi di continuità: sono i preziosi alleati di chi lavora 
con il personal computer e non può assolutamente permettere che un 
black out o un traballio nella rete principale gli mandi a rotoli ore e ore di 
importante lavoro. Tutto per conoscerli, qualche consiglio per 
acquistarli. 



One-liners 

Prosegue la pubblicazione dei migliori one-liners: alcuni di questi, 
finalmente, ci sono pervenuti direttamente dai lettori... e il concorso 
continua! Tra gli altri, un programma che disegna l’alba, uno che attiva il 
tasto delete, uno che disegna i confini dell’Italia, uno che da un decimale 
risale alla frazione... 



Basic Writer 

il software si evolve continuamente, ma anziché gettare via i programmi 
obsoleti è meglio cercare il modo di rinnovarli continuamente... Apple 
Writer // trova oggi un alleato super potente, che permette di saltare 
dall’ambiente elaborazione testo all’ambiente Basic. Se poi Util Writer e 
Pro Writer sono della partita. .. 
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Variabili 

Volete caricare in memoria un programma in Applesoft al di sopra di 
questo o quel codice macchina? O addirittura in cima a un codice ormai 
servito al suo scopo in un programma che sta girando? Oppure. . . 


Macnews 

È quasi un catalogo completo, questa carrellata con tutte le novità 
software per Macintosh, fresche di SMAU: programmi gestionali, di 
grafica, didattici, specifici per professioni... 


Grafica 

Che cosa sono le figure a blocco? Perché è importante farne la 
conoscenza? Per chi possiede l’Apple //c o il Ile con scheda 80 colonne 
continua l’entusiasmante viaggio nel mondo dell’altissima definizione. 


Appliscuola 

Eccoci alla terza puntata sul progetto Seraphim. In questo numero un 
software didattico che crea la simulazione al computer di un problema di 
equilibrio. 


Le rubriche 

6 Applichi 
IOApplicosa 

84 Applicando si trova anche qui 
86 Per chi comincia 


90 Applipratica 

91 Applettere 

93 Applihelp 

94 Disk Service 
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Un lettore di Bologna mi scrive: “Ho letto sui quotidiani che in America 
è in atto una crisi nel settore dei personal computer, dovuta a un notevole 
calo delle vendite in un mercato ormai saturo come quello americano. Quello 
che più mi preoccupa è che anche la gloriosa Apple è coinvolta in questa 
crisi. In sostanza, quale sarà secondo voi il destino della Mela? Leggendo 
queste notizie mi è venuto il dubbio di avere buttato parte dei miei risparmi 
in un sistema il cui futuro è paragonabile a un vicolo cieco!" 

E' probabilmente un quesito che si sono posti in molti. Per questa 
ragione, e senza mezzi termini, abbiamo intervistato Sergio Nanni, nuovo 
amministratore delegato della Apple Italia. L'intervista è a pag. 6, nella 
rubrica Applichi. 

Ma vorrei aggiungere alcune considerazioni personali che mi fanno 
ragionevolmente credere in un futuro roseo. 

Un po' stupiti, colti di sorpresa da uno strumento talmente innovativo e 
inatteso, per anni i giornali della grande stampa si sono divertiti ad 
alimentarne il mito: con il computer si governerà la casa intera, con il 
computer si farà questo e quest'altro. Il boom del personal computer è stato 
alimentato anche da queste voci un po’ irrazionali: molti l'han comprato 
prima ancora di capire cosa fosse, a cosa veramente potesse servire. E' 
stata questa componente di moda futile a venire a mancare a un certo punto. 
La gente non è stupida: ha cominciato a capire che il computer è utilissimo, 
ma a chi sa cosa farsene. Da qui una flessione di vendite, una riflessione del 
mercato. Molte previsioni di vendita delle case produttrici si sono rivelate 
troppo ottimistiche. Ma da qui, anche, un altro fenomeno irrazionale, di 
colore. Gli stessi giornali che avevano pompato il boom si sono messi a 
pompare lo sboom: adesso era quest’ultimo a far notizia. 

Ma quale sboom, quale crisi? Un aggiustamento, certo. Provvedimenti 
per adeguarsi a un mercato che si rivela diverso e più maturo rispetto a 
quello ipotizzato in precedenza, certo. La Apple ha ammesso qualche 
problema, ed è corsa ai ripari. Ma attenzione, anche la Fiat qualche anno fa 
aveva alcuni problemi: li ha ammessi, è corsa ai ripari, e guardate adesso 
come risplende... 

Non va inoltre dimenticato l'entusiasmo dell'utente Apple. Un 
entusiasmo che deriva sicuramente dalla soddisfazione del l'utilizzo di un 
Apple. Ma, soprattutto, è un entusiasmo che genera nuovi utenti. Infatti, sia 
dall'indagine condotta da Applicando, sia da altre indagini simili condotte 
sul mercato americano, risulta che ogni utente Apple, nell'arco di un anno, 
influenza mediamente quattro nuovi acquisti di sistemi Apple. 

Ma noi di Applicando crediamo di avere un motivo di serena fiducia in 
più. Il futuro della Apple interessa moltissimo i nostri lettori, ma interessa 
anche Applicando. La connessione è evidente: se il mercato di Apple cresce, 
cresce anche la rivista dedicata ai computer Apple. Ebbene: in questi mesi di 
perplessità, di notizie come quelle che hanno seminato dubbi nel lettore di 
Bologna che ci scrive, sono cresciute le vendite e sono cresciuti gli 
abbonamenti di Applicando. E si è trattato di una crescita non da poco. Noi 
possiamo offrire una sola interpretazione: il mercato sta maturando 
davvero, è appunto più razionale, meno emotivo. Ora il personal computer si 
compra non per moda o per ghiribizzo, ma dopo essersi documentati, averne 
capito le possibilità. Un compito, quello di informare, documentare, aiutare, 
che Applicando è felice di svolgere. 
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Sergio Nanni, il nuovo amministratore delegato delia 
Apple Computer, a colloquio con il ministro De Michelis. 


Se il cliente 
è sapiente 

Dal mese di settembre le 
redini della Apple computer 
Spa sono in mani nuove: 
Sergio Nanni, cinquant’anni 
e una laurea in legge, ex pre¬ 
sidente deiriberna, ex am¬ 
ministratore delegato della 
Castelmac (IMI) e direttore 
generale di divisione alla 
Magneti Marei li e al 
G.F.T., ne è infatti il nuovo 
amministratore delegato. 

Alto e sorridente, ha pre¬ 
senziato allo stand della Ap¬ 
ple durante l’ultimo SMAU 
con eleganza ed evidente 
soddisfazione. Eppure è di 
pochi mesi fa la notizia di 
una crisi dell’Apple statuni¬ 
tense, con la chiusura di al¬ 
cuni stabilimenti, 1.200 li- 
cenzamenti, un buco di 17 
milioni di dollari nella ge¬ 
stione del terzo trimestre. Si 
può ugualmente parlare di 
soddisfazione? 

"Certo: oggi siamo già in 
grado di valutare positiva- 
mente quel momento di in¬ 
certezza, dal quale è scaturi¬ 
ta un’operazione di ristrut¬ 
turazione molto salutare; la 
riunificazione delle divisioni 
Macintosh e Apple // si è ri¬ 
velata molto funzionale, e il 
suo costo (40 milioni di dol¬ 
lari) è già stato riassorbito; il 
terzo trimestre, infatti, ne 
ha sopportato tutto il peso, 
mentre si prevede che il 
quarto chiuderà addirittura 
in utile. Per avere il polso 
dello stato di salute della 
Apple, inoltre, basta consi¬ 
derare qual è attualmente la 
sua liquidità: oltre 250 mi¬ 
lioni di dollari. Una cifra che 
si commenta da sé." 

Subito prima dell’estate, 
però, si avvertiva una certa 
inquietudine anche sul mer¬ 
cato italiano, e non solo co¬ 
me conseguenza passiva del¬ 
le nubi d’oltreoceano... 

"Per quanto riguarda l’I¬ 
talia, si era notata nel perio¬ 
do da maggio a luglio una 
certa saturazione di uno dei 
mercati che avevano da 
sempre caratterizzato lo svi¬ 
luppo delle vendite dei per¬ 
sonal computer, cioè quello 


dell’"effimero": quello di chi 
comperava il personal per 
moda o per curiosità, e non 
per risolvere dei problemi 
reali. Quello, per intender¬ 
ci, di chi prima lo acquista¬ 
va, e poi si chiedeva cosa po¬ 
tesse farne. Una fascia di 
consumatori, questa, di cui 
in primavera è stata fatta 
giustizia, ma senza rimpian¬ 
ti: un mercato più pulito e 
più professionale non è un 
mercato in crisi." 

Chi oggi acquista un per¬ 
sonal computer, insomma, è 
spinto a farlo dalla necessità 
di risolvere i problemi che il 
suo lavoro gli propone quo¬ 
tidianamente. 

"E questo mercato è rima¬ 
sto molto importante, e ha 
continuato a svilupparsi: 
proprio a esso si rivolge oggi 
la Apple, anche e soprattut¬ 
to attraverso i nuovi Apple 
Center, che si differenziano 
dai tradizionali computer 
shop perché offrono al clien¬ 
te soluzioni complete, che 


gli si adattano perfettamen¬ 
te. La situazione prima era 
molto più confusa: un mer¬ 
cato che cresceva a ritmo 
vorticoso, nel quale erano 
mescolati utenti veramente 
interessati a concrete solu¬ 
zioni e utenti che del compu¬ 
ter non sapevano bene cosa 
fare, però lo volevano; di 
conseguenza anche il riven¬ 
ditore poteva assumere o 
meno un atteggiamento pro¬ 
fessionale. Adesso abbiamo 
selezionato i computer shop 
che da sempre hanno lavo¬ 
rato con atteggiamento pro¬ 
fessionale, e li abbiamo 
chiamati Apple Center, da 
quelli che hanno invece dato 
al cliente un computer e 
qualche pacchetto di softwa¬ 
re dicendogli fondamental¬ 
mente: arrangiati. Con gli 
Apple Center stiamo ope¬ 
rando in termini di proposte 
di soluzione." 

Anche a livello aziendale, 
però, si parla da tempo di 
crisi del personal computer: 


utilizzarlo al posto del vec¬ 
chio terminale non basta; ri¬ 
mane il problema di definire 
per lui una nuova identità, 
di individuare finalmente 
chi all’interno di una azien¬ 
da ne ha bisogno e cosa deve 
farne. 

"A livello aziendale c’è il 
fenomeno della sostituzione 
dei vecchi terminali ammini¬ 
strativi, che avviene a volte 
con dei personal computer; 
questo però non è un feno¬ 
meno di innovazione, si trat¬ 
ta semplicemente della so¬ 
stituzione di un terminale 
"stupido" con un terminale 
"intelligente". Innovativo è 
invece il comparire all’inter¬ 
no delle aziende di figure 
professionali che si rivolgo¬ 
no al personal computer per 
la soluzione di problemi pri¬ 
ma affrontati con altri stru¬ 
menti. Noi ci avviciniamo 
alle aziende anche con inte¬ 
ressanti proposte commer¬ 
ciali: per esempio i personal 
computer Apple potranno 
usufruire dal primo gennaio 
1986 del nuovo servizio di 
assistenza Honeywell, per il 
quale si stanno svolgendo 
adesso i corsi di addestra¬ 
mento. Le aziende che già 
usano i grandi macchinari 
Honeywell sanno che ora 
possono utilizzare un solo 
contratto di manutenzione 
anche per i loro personal, 
con risparmi notevoli di 
tempo e denaro, e con un’u¬ 
nica interfaccia amministra¬ 
tiva. Apple, comunque, è 
profondamente presente nel 
mercato aziendale, e con gli 
sviluppi che sono stati pre¬ 
sentati allo SMAU tende a 
inserirvisi con tempre mag¬ 
gior forza: collegamenti con 
diversi tipi di calcolatori e 
sviluppi di software per nuo¬ 
ve applicazioni operative 
(Jazz, per esempio) sono al¬ 
cune proposte che alle 
aziende interessano molto." 

E veniamo dunque, final¬ 
mente, a parlare un po’ di 
SMAU ; tantissimi i visitato¬ 
ri allo stand Apple, notevole 
il successo; come mai? 

"Lo SMAU è stato orga¬ 
nizzato per applicazioni: 
c’era il settore per i dentisti, 
il settore per la scuola, il set- 
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tore per i commercialisti, il 
settore per gli editori (dove 
abbiamo presentato tre ap¬ 
plicazioni di stampa con la 
nuova laser e addirittura un 
collegamento con la linoty¬ 
pe), eccetera. Il visitatore 
era invitato ad avvicinarsi 
allo stand Apple non per 
ammirare i 512 K del Macin¬ 
tosh, ma per trovare la solu¬ 
zione ai suoi problemi ge¬ 
stionali. E se non aveva pro¬ 
blemi gestionali da risolve¬ 
re, nessuno lo tediava con 
questo argomento... osser¬ 
vando solo quello che gli in¬ 
teressava scopriva che il 
computer Apple consente di 
svolgere meglio il proprio 
lavoro; questa è la nuova fi¬ 
losofia con cui ci avvicinia¬ 
mo al mercato, e che il mer¬ 
cato dà già segno di voler 
premiare." 

Un’ultima, piccola e forse 
un po’ pettegola, curiosità: 
Steve Jobs se ne va trasci¬ 
nandosi dietro le ire della 
Apple, che pure è stato lui a 
creare; decine di miliardi in 
ballo e un’azione penale in 


Steve Jobs. La sua decisione 
di fondare una nuova società 
ha scatenato un mare 
di polemiche. 



corso perché ha deciso di 
fondare una nuova società, 
in barba agli impicci legali. 
Che cosa si può dire di lui? 

"Steve Jobs aveva lasciato 
gli incarichi operativi da me¬ 
tà giugno, per cui influenze 
sulla vita della Apple in con¬ 
seguenza di quanto è succes¬ 
so dopo di allora sicuramen¬ 
te non ce ne saranno. Il fatto 
che Steve Jobs abbia deciso 
di dare le dimissioni e di in¬ 
traprendere una nuova atti¬ 
vità non cambia sicuramen¬ 
te nulla nella vita della Ap¬ 
ple, e poiché comunque è in 
corso un’azione legale, ogni 
commento sugli aspetti più 
delicati della vicenda sareb¬ 
be, oltreché poco corretto, 
anche non coerente con il 
fatto stesso che tale proce¬ 
dura è in corso." 

Gualtiero 
per studiare 

Ogni mese Gualtiero 
Marchesi, il Divino della 
Nouvelle Cuisine, ammette¬ 
rà ai segreti dei suoi fornelli 
un’eletta schiera di appren¬ 
disti cucinieri: 12 parteci¬ 
panti (ci si può iscrivere an¬ 
che per una sola lezione) 
trascorreranno una delizio¬ 
sa mattina assistendo ai pre¬ 
parativi di un pasto comple¬ 
to che poi, naturalmente, 
consumeranno beati. 

Gualtiero Marchesi in¬ 
tratterrà i suoi "ospiti" inse¬ 
gnando loro l’arte preziosa 
del giusto accostamento dei 
vini. Il pomeriggio si trasci¬ 
nerà pigramente tra doman¬ 
de e risposte, scambi di in¬ 
formazioni, consigli e sugge¬ 
rimenti. 

Poi, a casa, con il pro¬ 
gramma Computer cuisine 
che Applicando ha realizza¬ 
to con i menù di Gualtiero 
Marchesi, gli studenti po¬ 
tranno ripassare la lezione, 
per la gioia dei loro familia¬ 
ri. 

Il corso si svolgerà nel ri¬ 
storante di Gualtiero Mar¬ 
chesi in via Bonvesin de la 
Riva 9 a Milano. Per preno¬ 
tazioni (190 mila lire a gior¬ 
nata) telefonare a questo 
numero: 02 741246. 


Mac fa 
Economia 

Si è tenuto in questi giorni 
a Trento (11-12 ottobre) il 
secondo convegno annuale 
dell’Aissec, associazione re¬ 
lativamente nuova, ma già 
accreditata, nel panorama 
culturale italiano. 

Fondata a Firenze nell’a- 
prile del 1984, è l’associazio¬ 
ne che promuove, senza sco¬ 
po di lucro, la circolazione 
delle idee e l’attività di stu¬ 
dio e di ricerca nel campo 
dei sistemi economici com¬ 
parati, ed è composta attual¬ 
mente da 190 studiosi italia¬ 
ni, tra i quali Caffè, Lom- 
bardini, Nuti, Salvati; la 
presiede il professor Vitto¬ 
rio Valli dell’Università di 
Torino. 

Ma veniamo al convegno 
di Trento. Da Cambridge e 
da Budapest sono giunti i 
professori Eatwell, Kuczin- 
ski e Szamuely, che hanno 
tenuto le relazioni introdut¬ 


tive, volte principalmente 
ad analizzare i problemi 
connessi alle economie del 
terzo mondo e dell’est euro¬ 
peo; anche gli interventi de¬ 
gli altri studiosi si sono inte¬ 
ressati soprattutto alle eco¬ 
nomie dei paesi in via di svi¬ 
luppo e alle situazioni più 
critiche del continente. È 
stata complessivamente de¬ 
nunciata, inoltre, la grossa 
carenza, in Italia, di uno stu¬ 
dio sistematico delle ten¬ 
denze di medio e lungo pe¬ 
riodo e dei mutamenti strut¬ 
turali dei principali sistemi 
economici esteri. 

Macintosh, intanto, lavo¬ 
rava a pieno ritmo: tutte le 
relazioni, le comunicazioni, 
le presentazioni, i bollettini, 
gli interventi, venivano affi¬ 
dati alla sua capace memo¬ 
ria per una prima elabora¬ 
zione. Gli atti del convev- 
gno, dopo un’operazione di 
riordinamento e ripulitura 
fatta a video, saranno ben 
pesto pronti per la pubblica¬ 
zione. 
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Teo Rusconi ha appena 
sfatato la leggenda 
secondo la quale i floppy disc 
sono tutti uguali 


Difatti sembrano tutti uguali finché non 
si osserva con attenzione il jacket. Qui 
termina l’uguaglianza. 

La maggior parte delle società costruttrici 
sigillano i dischi un punto qui, un punto là, 
lasciando parte dei lembi non sigillati. 

Prima o poi ai lembi accadono cose 
naturalissime: si gonfiano, si curvano, si 
raggrinziscono... in poche parole si aprono. 

Con penne, matite, unghie persino un 
ragazzino di quattro anni come Teo può 
infilarsi in quegli spazi aperti. 

Naturalmente è un danno enorme perchè 
se si inserisce qualcosa di molle e slabbrato 
nel disc-drive quest’ultimo può incepparsi; 
si può rovinare la testina e si possono 
perdere i dati. 



Questo può accadere con gli abituali 
sistemi di chiusura ma non con i dischetti 
Memorex che usa un procedimento 
esclusivo chiamato 
“Solid-Seam Bonding”. 


Con questo sistema ogni singolo 
millimetro quadrato dei lembi di tutti i dischi 
Memorex viene sigillato ermeticamente, 
rendendoli più rigidi e più resistenti. 



DISCHETTI MEMOREX 

con lembi completamente 
saldati su tutta 
la superficie. 


È un sistema che consente al floppy disc 
di sostenere ogni assalto, che impedisce alla 
testina di rovinarsi e ai dati di andare perduti. 

Il che sta a dimostrare che un floppy disc 
Memorex non è uguale a tutti gli altri: è 
migliore. E il sistema di saldatura è solo un 
esempio della cura infinita con cui viene 
prodotto ogni floppy disc Memorex; sia 
esso da 8”, da 5 1/4” o il nuovo 3 1/2”. 

Questa estrema accuratezza dà la garanzia 
che ogni disco Memorex è al 100% perfetto. 

La prossima volta che acquistate un 
floppy disc - o qualche centinaio, 

- ricordate: non tutti i 
dischetti sono uguali... 

Memorex vi mette al 
riparo da qualsiasi 
incopveniente. 
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Un ottimo 
debutto 

Come sa chi è venuto allo 
SMAU e, facendosi largo 
tra i molti visitatori sempre 
accalcati, ha potuto vedere 
in azione le ultime novità 
proposte dalla Apple, di co¬ 
se da dire ce ne sono parec¬ 
chie. (Ma purtroppo nulla 
da dire, invece, a proposito 
di prezzi: è ancora troppo 
presto per conoscerli.) 

Innanzitutto la nuova 
stampante ImageWriter II, 
che oltre a incontrare l’entu¬ 
siasmo del pubblico ha vinto 
il premio SMAU 1985 per 
l’ottimo livello delle sue pre¬ 
stazioni: ne parliamo diffu¬ 
samente più oltre. 

Per Macintosh lo SMAU 
ha preparato una gradita 
sorpresa: una memoria di 
massa da 20 megabyte con 
tecnologia Winchester (si 
sussurra che costi 3,5 milio¬ 
ni). L’hard disk, predispo¬ 
sto per una perfetta integra¬ 
zione con la macchina, si 
collega all’uscita per l’unità 


Apple//c con il nuovo 
monitor a colorì e Macintosh 
con l’Hard Disk. 


disco aggiuntiva e trova 
un’ottima collocazione pro¬ 
prio sotto il computer. Il vo¬ 
lume di archiviazione e su¬ 
periore di 50 volte a quello 
eli un singolo disco, con una 


velocità di ricerca e di lettu¬ 
ra tre volte più elevata; una 
porta collocata sul retro del 
disco consente il collega¬ 
mento con una seconda uni¬ 
tà da 20 Mb o con l’unità 


esterna da 3,5". 

Sempre a proposito di 
memoria, una novità anche 
per il //e, che diventa così 
sempre più grande: un’e¬ 
spansione ram che parte da 
256 Kb e può raggiungere 1 
Mb di memoria centrale con 
l’aggiunta di tre banchi sup¬ 
plementari. 

Apple //e e Apple //c, 
inoltre, possono contare da 
oggi sull’attesissimo moni¬ 
tor a colori ad alta definizio¬ 
ne; i due modelli differisco¬ 
no solamente per il design 
esterno e per il sistema di 
appoggio, e presentano in¬ 
vece le medesime prestazio¬ 
ni: uscita di tipo PAL diret¬ 
tamente collegabile all’usci¬ 
ta video di Apple //e o NTSC 
per Apple //c, 13 pollici con 
possibilità di visualizzazione 
anche monocromatica su 40 
o 80 colonne, risoluzione 
560 x 196. 

La famiglia Apple //, infi¬ 
ne, importa da Macintosh il 
suo stile operativo, grazie a 
Mouse Desk, un nuovo si¬ 
stema basato sull’uso del 
mouse e dei menù sequen¬ 
ziali. 

Ha vinto 
Macintosh 




Quando Macintosh è ap¬ 
parso sulla scena del merca¬ 
to mondiale c’è stato chi ha 
tentato di risolvere la pro¬ 
pria mancanza di fantasia ri¬ 
calcando apertamente i suoi 
modi di funzionamento. È 
stato questo il caso dei com¬ 
puter IBM e compatibili, di 
impostazione classicissima, 
per i quali la Digital Re¬ 
search ha dato il via a un’o¬ 
perazione di ringiovanimen¬ 
to a spese di Macintosh, ap¬ 
punto. Come? Con i pac¬ 
chetti applicativi denomina¬ 
ti Gem che usavano proprio 
quel tipo di videata, che sug¬ 
gerivano proprio quel tipo 
di rapporto tra schermo e 
utente. La Apple, che ha 
prontamente denunciato la 
produttrice del software pla¬ 
giarne in nome dei propri di¬ 
ritti di copyright, ha siglato 
un accordo che prevede il ri- 








tiro dal mercato della ver¬ 
sione del programma attual¬ 
mente distribuita nonché un 
risarcimento danni e l’impe¬ 
gno allo sviluppo di pro¬ 
grammi applicativi su pro¬ 
dotti Apple o in collabora¬ 
zione con Apple. With com- 
pliments. 

Applicare 
costa meno 

Su tre fronti, fondamen¬ 
tali, la Apple annuncia un 
significativo ridimensiona¬ 
mento di prezzo: Apple //c, 
Macintosh in entrambe le 
versioni e ImageWriter da 
oggi costano meno. Il conti¬ 
nuo progresso tecnologico 
permette infatti sempre 
maggiori risparmi sui costi 
di produzione, che si riper¬ 
cuotono poi felicemente sui 
listini. 

Ecco i nuovi prezzi e, tra 
parentesi, quelli vecchi. 

Apple he: 1.900.350 

(2.399.350) ; Macintosh 128 
K: 4.299.350 (4.499.350); 
Macintosh 512 K: 5.299.350 

(5.999.350) ; Imagewriter: 
999.000 (1.150.000). E spe¬ 
riamo che si continui così! 

Senza svolazzi 

Un unico pacchetto appli¬ 
cativo con tante funzioni, fa¬ 
cile da usare, molto veloce, 
privo di fronzoli superflui e 
davvero utile. Con questo 
biglietto da visita si presenta 
Harmony, 250 mila lire Iva 
esclusa, un potente filer pro¬ 
dotto da HL software. 

Innanzitutto è possibile 
creare fino a tre pagine, sfo¬ 
gliagli avanti e indietro, con 
chiave di accesso segreta, se 
desiderata. Il numero dei 
campi è illimitato e ogni di¬ 
sco può ospitare fino a 512 
schede, ordinabili alfabeti¬ 
camente e ricercabili con 




Le realizzazioni dello Studiograph. 


chiavi multiple (fino a otto), 
ognuna con 4.800 caratteri. 

La stampa è personalizza¬ 
bile e l’aggiornamento dei 
record numerici è automati¬ 
co. Sempre presente (richia¬ 
mabile con un tasto) è la cal¬ 
colatrice, ed è possibile 
stampare il contenuto dello 
schermo in qualsiasi istante. 
Tre i tipi di grafici che Har¬ 
mony è in grado di realizza¬ 
re: a linee, a barre e a torta, 
con un massimo di 12 voci 
per grafico. La stampa 
(HI-RES) è possibile su 
due tipi di stampante: Image 
Writer ed Epson. 

Con Harmony, infine, è 
possibile digitare un testo in 
cui vengono inseriti i para¬ 
metri da ricercare in archi¬ 
vio: una volta definite le 
chiavi tutto avverrà automa¬ 
ticamente secondo i canoni 
di un vero e proprio mail 
merge. 

Mac d’Oltremare 

È stato Macintosh a per¬ 
mettere allo Studiograph di 


Napoli la realizzazione della 
locandina, del biglietto invi¬ 
to, delle tessere e degli ade¬ 
sivi necessari per il Salone 
Audio Video 1985 curato 
dall’Ente autonomo mostra 
d’oltremare di Napoli. 

L’obiettivo della ricerca 
grafica era quello di conferi¬ 
re alla rassegna un nuovo 
look, evidenziando il salone 
con un impatto grafico rife¬ 
rito al mondo dell’HI-FI e 
del Video. I vari elementi 
scelti (compact disk, loud- 
speaker, registratori, lettore 
C.D. eccetera) sono stati 
passati al computer con 
Thunder Scan. Anche tutte 
le operazioni di "taglia e in¬ 
colla" sono state eseguite 
con il Macintosh. 

La composizione genera¬ 
ta infine dalla stampante è 
stata ingrandita e resa più 
sofisticata con la tecnica ae- 
rografa e con ulteriori colo¬ 
razioni: l’effetto ottico che si 
voleva creare, infatti, era di 
rifrazione, come se l’illu¬ 
strazione apparisse attraver¬ 
so lo spessore di uno scher¬ 
mo. 


Che mal 
di schiena! 

Verbatim, la nota produt¬ 
trice californiana di dischi, 
cassette e accessori, ha dato 
il via a una simpatica inizia¬ 
tiva volta a migliorare le 
condizioni di lavoro, spesso 
faticose e stressanti, degli 
operatori addetti ai video- 
terminali. Senza doversi al¬ 
lontanare dalla tastiera, in¬ 
fatti, anzi senza nemmeno 
alzarsi dalla sedia, è possibi¬ 
le eseguire alcuni facili, pic¬ 
coli, simpatici esercizi rilas¬ 
santi e tonificanti. 

Guerra al mal di schiena, 
dunque, alle dita anchilosa- 
te, agli occhi stanchi. L’opu¬ 
scolo della Verbatim, con 
decine di suggerimenti gin¬ 
nici illustrati, è disponibile 
nei negozi che vendono i 
suoi prodotti. Eccone alcu¬ 
ni: per rilassare la schiena, 
rimanere seduti piegando il 
tronco tra le ginocchia, ab¬ 
bassando il più possibile col¬ 
lo, spalle e braccia; ritorna¬ 
re alla posizione orginale, 
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raddrizzarsi bene e rilassar¬ 
si. Per eliminare la tensione 
accumulata nelle mani, ri¬ 
volgere le palme verso il 
basso e allargare le dita 
quanto più è possibile; rima¬ 
nere in questa posizione 
contando fino a cinque; ri¬ 
petere più volte. Per allevia¬ 
re la fatica delle spalle, por¬ 
tare la mano destra dietro le 
spalle e la sinistra dietro la 
schiena e allacciare le dita 
delle mani; ripetere l’eserci¬ 
zio al contrario. 

Honeywell per 
Apple 

Interessa, e molto, la 
grande utenza, quella com¬ 
posta da aziende medie e 
grandi, da enti e istituzioni, 
il nuovo accordo tra Apple e 
Honeywell, già operativo 
negli USA, per offrire un 
supporto di assistenza tecni¬ 
ca alle fasce di mercato che 
necessitano di una grande 
organizzazione nazionale, 
come quella che la Honey¬ 
well appunto garantisce. 

La HIS (Honeywell Infor¬ 
mation System) Italia met¬ 
terà a disposizione degli 
utenti di personal computer 
Apple la propria rete di assi¬ 
stenza tecnica in Italia; le 
aziende che utilizzano i 
grandi sistemi Honeywell 
potranno così appoggiarsi ai 
contratti di assistenza e ma¬ 
nutenzione già in corso an¬ 
che per i personal di loro 
proprietà. 

L’accordo tra Apple e HI- 
SI prevede la fornitura di 
parti di ricambio e l’adde¬ 
stramento dei tecnici HISI 
da parte di Apple, realizzato 
in tempi tali da consentire 
che l’accordo sia pienamen¬ 
te operante già dal primo 
gennaio 1986. 

Una decisione di questo 
tipo sottolinea il "nuovo cor¬ 
so" avviato dalla Apple 
Computer: finita l’epoca del 
personal computer acquista¬ 
to per moda o per curiosità, 
il mercato appare abitato so¬ 
prattutto da utenti ad alta 
professionalità, attenti ai 
concreti vantaggi che l’uso 


di un personal computer 
può procurare. 

Printer buffer 

Per Apple //e e //plus è ar¬ 
rivato un nuovo buffer di 
stampa, interamente gestito 
da microprocessore, che 
permette una trasmissione 
dati tra computer e periferi¬ 
che con magazzino di me¬ 
moria di 64 Kb. 

Il buffer GPA 727 si cari¬ 
ca in memoria i dati prove¬ 
nienti dal computer alla 
massima velocità da questo 
consentita, iniziando subito 
a trasmetterli, in completa 
autonomia, alla stampante: 
l’impegno del computer in 
fase di stampa risulta così 


notevolmente diminuito, 
con evidenti vantaggi di fun¬ 
zionalità del sistema. 

Ecco le principali caratte¬ 
ristiche tecniche del buffer. 
Alimentazione: 5V della 
stampante o con apposito 
DC power; input data: con¬ 
nettore standard a pannello; 
output data: cavo m 1,5 con 
connettore finale; protocol¬ 
lo: seriale o parallelo; capa¬ 
cità: 8-64 Kb netti; dimen¬ 
sioni: mm 85 x 150 x 25; fun¬ 
zione PAUSE: comando 
hardware; funzione RE¬ 
SET: pulsante sull’apparec¬ 
chio; prezzo: 243.000 per 
16K ram, 286.000 per 32 e 
328.000 per 64 (Iva esclusa). 
Prodotto dalla Delin, Via 
Cosentino 22, Firenze. Te¬ 
lefono 055/4379586. 


IF= 



Per alimentare 

Gli Easifeed 230 e 130, di¬ 
stribuiti dalla Datamatic, si 
propongono di risolvere si¬ 
tuazioni molto differenzia¬ 
te; il modello 230 è un ali¬ 
mentatore automatico di fo¬ 
gli singoli, abbinabile prati¬ 
camente a ogni stampante 
esistente sul mercato; l’ap¬ 
plicazione è molto semplice 


Disknews 

Il mercato dei floppy disk, 
tirando le somme delle ven¬ 
dite, è un po’ ballerino: chi 
prevedeva il raddoppio ha 
dovuto rimangiarsi le sue 
convinzioni, ma anche chi 
prometteva catastrofi. Dalla 
tabella sul mercato mondia¬ 
le dei floppy disk appare evi¬ 
dente che la crescita prevista 
fino al 1988 è molto vivace, 
con uno scostamento però 
tra i dati di volume e quelli 
di valore che evidenzia il 
problema dei prezzi nel 
settore. 

Alcuni dati che interessa¬ 
no da vicino i consumatori 
sono quelli relativi ai diversi 
successi incontrati dai vari 
formati; il più vecchio, quel¬ 
lo da 8", è destinato a una 
crescita più contenuta nei 
prossimi anni e addirittura 
al declino, a iniziare dal 
1987, mentre il più giovane, 
il microdisco, va verso uno 
sviluppo molto elevato, al 
quale però non sembra ac¬ 
compagnarsi un degno ridi¬ 
mensionamento dei costi. 

Un aumento notevolissi¬ 
mo (190 milioni di unità in 
più), il massimo previsto 
nell’intero settore, è desti¬ 
nato comunque alla "taglia 
media": grazie al gran nume¬ 


ro di drive da 5,25 pollici, 
sarà questo il formato desti¬ 
nato al successo maggiore. 


Mercato mondiale 
dei floppy disk 


Anno 

Valore 

(milioni 

USA) 

Volume 

(milioni) 

1982 

«270 

«378 

1983 

«430 

«538 

1984 

«600 

«600 

1985 

«820 

«738 

1986 

1100 

«880 

1987 

1500 

1050 

1988 

2000 

1200 


Tutte le ditte produttrici, 
comunque, sono impegnate 
a garantire la propria pre¬ 
senza sul mercato ai livelli 
qualitativi più alti, con inno¬ 
vazioni tecnologiche, o este¬ 
tiche, o funzionali... o con 
tutte insieme. 

C’è addirittura chi inizia 
ora la sua produzione di 
floppy disk, per inserirsi in 
un mercato non ancora satu¬ 
ro, e pieno di promesse; è il 
caso di Pelikan, leader nel 
settore cancelleria, che pre¬ 
senta una gamma di dischet¬ 
ti da 5,5 pollici, disponibili 
in confezione Twin da due 


pezzi o in scatola da dieci, a 
faccia doppia o singola, con 
densità doppia o quadrupla 
(96 tracce per pollice). I di¬ 
schetti Pelikan promettono 
un’affidabilità del 100%: to¬ 
talmente errorfree anche in 
condizioni estreme. 

Nuova gamma di prodotti 
(si chiama Scotch) anche 
dalla 3M, rivolta in partico- 
lar modo agli utenti di per¬ 
sonal computer domestici. 
Per il formato 5,25" i disket¬ 
te disponibili sono quattro 
(due da 48 tpi e due da 96), 
in confezioni da due, cin¬ 
que, e dieci pezzi; per le uni¬ 
tà di comando a diskette 
5,25" la gamma Scotch com¬ 
prende anche un corredo 
per la pulizia di testine. So¬ 
no disponibili anche i di¬ 
schetti da 3,5" (SSSD, 135 
tpi), in confezione da dieci, 
che godono, come tutti i 
prodotti EDP Scotch, di ga¬ 
ranzia illimitata. 

La Memorex, dal canto 
suo, ha messo l’abito nuovo 
alla sua gamma di dischi e 
diskette; un nuovo design, 
giovane e dinamico, dise¬ 
gnato dalla Landor Associa¬ 
tes, caratterizza ora tutti i 
suoi prodotti. La Memorex, 
che per prima ha introdotto 
nel mercato i supporti a dop¬ 
pia faccia e 1 Mb non for- 
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L’alimentatore distribuito dalla Datamatic. 


e veloce, grazie a un piccolo 
telaio di adattamento dispo¬ 
nibile in svariate misure per 
ogni tipo di macchina. 

Anche nel caso di sostitu¬ 
zione della stampante con 
un altro modello, quindi, 
non si creano problemi di 
adattamento; Easifeed 230, 
in pratica, trasforma ogni 
stampante in un mailing 
center. 

Il modello 130 è previsto 
invece per stampanti prive 
di trascinamento a trattore, 
come sono, per esempio, le 
macchine per scrivere utiliz¬ 
zate come stampanti, e con¬ 
sente l’alimentazione dei 
moduli continui. Anche in 
questo caso l’unità è costi¬ 
tuita da un telaio di adatta¬ 
mento, in varie misure, sul 


quale si innestano due car- 
rarmati regolabili in lar¬ 
ghezza, con cingolatura al¬ 
tamente professionale. Il 
trascinamento dei moduli ri¬ 
sulta così altamente affida¬ 
bile. 

Anche a proposito di na¬ 
stri inchiostranti la Datama¬ 
tic presenta una nuova pro¬ 
posta: Rheinband è una li¬ 
nea di prodotti dal costo 
contenuto compatibili con 
tutte le stampanti più diffu¬ 
se. Il supporto, l’inchiostra¬ 
zione e la cassetta di conte¬ 
nimento sono sottoposti a 
controlli di qualità appro¬ 
fonditi durante la fabbrica¬ 
zione e a collaudi a campio¬ 
ne sul prodotto finito, per 
garantire risultati di impiego 
ineccepibili. 


mattato, ha inoltre sensibil¬ 
mente ampliato la propria 
gamma, in modo da soddi¬ 
sfare tutti gli utenti. 

Si chiama Strato magneti¬ 
co a isotopia rinforzata il 
processo di produzione dei 
dischetti High Focus della 
RPS; grazie a esso l’orienta- 
mento delle particelle del 
supporto non influenza più 
la qualità della registrazio¬ 
ne, che risulta in tutte le sue 
fasi perfetta. La sicurezza di 
utilizzo è in questo modo to- 


: _ 

MEMOREX 





talmente garantita, anche 
quando il sistema è oltre i 
limiti di tolleranza. La dura¬ 
ta di vita dei dischetti High 
Focus è inoltre elevatissima. 

Tecnologia d’avanguar¬ 
dia ed estrema semplicità di 
utilizzazione caratterizzano 
i dischi della serie 5,25" fir¬ 
mata Panasonic. L’uso di 
uno speciale materiale ma¬ 
gnetico a particelle sopraffi¬ 
ne ottimizza i processi di re¬ 
gistrazione e lettura e con¬ 
temporaneamente prolunga 
la vita del dischetto poiché 
risulta diminuito l’attrito tra 
la testina del drive e la su¬ 
perficie del disco magneti¬ 
co. L’involucro infine, gra¬ 
zie all’uso di una garza inter¬ 
na con elevate capacità pu¬ 
lenti, è molto affidabile e ga¬ 
rantisce un’ottimale conser¬ 
vazione del dischetto. 

I nuovi FlexyDisk Quali- 


metric della BASF si pre¬ 
sentano rinnovati nella con¬ 
fezione e nella qualità: car¬ 
tone plastificato e nuovo de¬ 
sign più custodia antistatica 
da un lato, accresciuta sicu¬ 
rezza (100% errorfree) dal¬ 
l’altro. Anche la vita media 
dei dischetti è aumentata: 70 
milioni di passaggi per trac¬ 
cia, con resistenza a tempe¬ 
rature superiori ai 70°. L’as¬ 
sortimento (500 diversi tipi 
di dischetti) basta a soddi¬ 
sfare anche i più esigenti e 
originali consumatori. 

I nuovi floppy "heavy du- 
ty" della Fuji Film, distribui¬ 
ti in Italia dalla Cbs, assicu¬ 
rano oltre 20 milioni di pas¬ 
saggi grazie al nuovo binder 
RD con struttura tridimen¬ 


sionale flessibile. Tutte le 
tracce sono 100% errorfree 
e ne è garantita la stabilità 
nelle caratteristiche di inpu¬ 
t/output. Il valore di modu¬ 
lazione è bassissimo: 3% cir¬ 
ca. Molto sicura e resistente 
anche la confezione. 

Infine, l’innovazione tec¬ 
nologica ha baciato in fronte 
anche i dischi della HP Data 
Memories, 100% errorfree. 
I supporti magnetici sono te¬ 
stati oltre i limiti di resisten¬ 
za dettati dagli standard 
qualitativi, cosicché il pro¬ 
dotto risulta assolutamene 
affidabile anche nelle situa¬ 
zioni di lavoro più critiche. 
Ogni dischetto è certificato 
al 100% secondo le norme 
principali. 


Scotch 


*3jj| 


FUJI FILM FLOPPY DISK 



Scotch 
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Per quanto riguarda i 
prezzi, va detto che stanno 
subendo proprio ora alcuni 
ritocchi, fortunatamente in 
discesa, e non è quindi pos¬ 
sibile essere precisi; circa 
600 mila lire per il modello 
230 e circa 250 per il 130, 
comunque; Iva esclusa. 

ImageWriter // 

In occasione del salone 
SMAU ’85, la Apple com¬ 
puter ha presentato la nuova 
stampante ImageWriter //, 
che nelle intenzioni dei tec¬ 
nici dovrebbe pian piano so¬ 
stituire la ImageWriter I. La 
nuova periferica, premiata 
per il miglior design indu¬ 
striale del 1985, si presenta 
come il naturale migliora¬ 
mento e perfezionamento 
della ImageWriter I, della 
quale mantiene oltre al no¬ 
me anche gran parte delle 
caratteristiche di base; la 
nuova stampante risulta 
quindi compatibile con tutti 
i computer Apple: Mac, //e, 
Europlus e //c. Il potenzia¬ 
mento del modello prece¬ 
dente è avvenuto sostanzial¬ 
mente in quattro direzioni: 
maggiore velocità, maggio¬ 
re qualità di stampa, capaci¬ 
tà di utilizzare i colori e pos¬ 
sibilità di collegare alcuni in¬ 
teressanti accessori. 

L’ImageWriter // possie¬ 
de vari livelli di qualità di 
stampa, a ognuno dei quali è 
associata una particolare ve¬ 
locità di output: 

1. Letter Quality. Con que¬ 
sto modo di stampa è possi¬ 
bile ottenere una qualità 
molto simile a quella di una 


stampante a margherita, a 
una velocità di circa 45 ca¬ 
ratteri al secondo. Da utiliz¬ 
zare, per esempio, per co¬ 
municazioni formali, pre¬ 
sentazioni eccetera. 

2. Standard. Con questa op¬ 
zione si ottiene una stampa 
con caratteri abbastanza 
densi, ad una velocità di 180 
CPS, cioè già superiore a 


quella dell’ImageWriter I. 

3. Bozza. In questo modo si 
può disporre di una notevo¬ 
le velocità, 250 CPS, con 
una densità di carattere di¬ 
screta, sufficiente per tutti 
gli stampati di prova, dove 
l’aspetto qualitativo può es¬ 
sere sacrificato a vantaggio 
di una superiore rapidità. 

Inoltre, rispetto al model¬ 
lo precedente, ImageWriter 
// consente di utilizzare di¬ 
rettamente apici e pedici, i 
caratteri del mouse e i carat¬ 
teri a mezza altezza. 

Altra novità assoluta è la 
possibilità di utilizzare fino a 
6 colori contemporanea¬ 
mente, oltre al nero, inse¬ 
rendo il nastro con 4 colori 
di base. Con programmi che 


Due esempi di stampa testo e 
tre realizzazioni a colori deila 
nuova ImageWriter//. 


Letter quality printers produce fully formed characters like 
typewriters do—a quality that is desirable for business letters 
and reports Letter quality printers work by positioning 
characters molded on thè tips of a circulating wheel or 
thirnble After a character is positioned, a small hammer 
pushes it against a ribbon, making an ìrnpression on paper 

Letter quality printers produce fully formed characters 
like typewriters do—a quality that is desirable for 
business letters and reports. Letter quality printers work 
by positioning characters molded on thè tips of a 
circulating wheel or thimble. After a character is 
positioned, a small hammer pushes it against a ribbon, 
making an impression on paper. 


sfruttano il colore è possibi¬ 
le, per esempio, disegnare 
grafici ad alta risoluzione, 
stampare documenti, oppu¬ 
re inserire del testo in nero 
su un grafico a colori. Sele¬ 
zionare i colori via software 
è molto semplice, basta an¬ 
teporre al testo, o al grafico 
che si intende stampare, il 
carattere di controllo ESC K 
seguito da un numero da 0 a 
6, a ognuno dei quali è asso¬ 
ciato un colore. 

Particolare attenzione va 
fatta ai tre accessori disponi¬ 
bili per l’ImageWriter // che 
consentono di aumentare 
notevolmente le capacità di 
questa periferica: un carica¬ 
tore di fogli singoli, un buf¬ 
fer di 32K e l’opzione Ap- 
pleTalk. 

Il caricatore di fogli singo¬ 
li si dimostra particolarmen¬ 
te utile se si devono effettua¬ 
re grandi lavori di stampa, 
per esempio su carta intesta¬ 
ta o comunque su fogli sin¬ 
goli, poiché consente di cari¬ 
care fino a 100 fogli in una 
sola volta, provvedendo au¬ 
tomaticamente ad alimenta¬ 
re la stampante. 

Con il buffer di 32K è pos¬ 
sibile espandere la memoria 
della stampante, con il note¬ 
vole vantaggio di poter tra¬ 
sferire dalla memoria del 
calcolatore fino a 32000 ca¬ 
ratteri in una sola volta, vale 
a dire quasi 18 cartelle, il che 
consente di continuare a uti¬ 
lizzare il calcolatore mentre 
la stampante sta lavorando. 

Installando la scheda Ap- 
pleTalk, ogni stampante 
può gestire fino a 31 compu¬ 
ter collegati in rete. Occorre 
però precisare che l’impiego 
del buffer e dell’opzione 
AppleTalk sono alternativi, 
cioè quando si utilizza il buf¬ 
fer non è possibile lavorare 
in rete e viceversa. 
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BENE O 


PRESENTARLO 


Milano, 17 Luglio 1985 


DA: Mario Bianchi (Direttore Vendite) 
A: Gianni Rossi (Direttore Generale) 


L’andamento delle vendite nel corso di quest'anno nello stato del 
Colorado per quanto riguarda il prodotto A ha subito un calo rispetto 
all'andamento delle vendite dei prodotti B, C, D ed E. Infatti ne sono stati 
venduti soltanto 1200 pezzi, nonostante le previsioni di vendita all'inizio 
dell'anno fossero tutt'altro che negative. 

Purtroppo stiamo assistendo ad una crisi del settore che si riuscirà' a 
risolvere solo con azioni di politica economica che esulano dalla nostra 
area di intervento. Infatti, la popolazione di Denver e' in calo e cosi' anche 
i consumi alimentari ne hanno risentito. 

Nonostante comunque l'andamento del mercato sia poco favorevole, il 
bilancio complessivo è da giudicarsi positivamente. Con sacrifici ed 
un'attenta gestione operativa, abbiamo ridotto il nostro intervento nei 
segmenti meno redditizi, aumentando gli srorzi di vendita del prodotto D 
che cosi risulta quello che maggiormente ha contruibuito all'utile 
aziendale. 

Sperando di poter riportare risultati più brillanti anche dalle vendite, 
non appena ripartirà il mercato, invio cordiali saluti 

Mario Bianchi 



Ogni giorno vengono stilati migliaia di 
rapporti aziendali. La maggior parte viene 
sottoposta all'approvazione, alcuni vengono 
letti, pochi discussi, pochissimi vengono 
ricordati. Tutti gli strumenti di cui hai bisogno 
per ottenere business report indimenticabili, li 
puoi trovare su un solo dischetto: Ensemble. 
Ensemble riunisce il trattamento testi, la 
gestione dati, l'impostazione e la creazione 
di report, il calcolo e la grafica in un solo 
programma molto potente e produttivo. Il 
miglior pregio di Ensemble è la sua facilità. 
Studiato pensando a te e al tuo computer 
preferito, il Macintosh anche con solo 128K, 
Ensemble sfrutta tutti i vantaggi del 
Macintosh User Interface ed è compatibile 
con MacWrite e MacPaint. Ma questo non è 
il solo modo in cui Ensemble ti aiuta a 
migliorare. Puoi utilizzare Ensemble anche 
per creare Databases, effettuare analisi 
decisionali, fare mailing e altro ancora. 

Fatti ricordare con Ensemble. Fissa un 
appuntamento oggi stesso con il tuo software 
dealer oppure telefona, senza alcun impegno, 
a Italware a questo numero: 02-21623606. 



Milano, 17 Luglio 1905 


DA Mario Bianchi (Direttore Vendite) 
A Gianni Possi (Direttore Generale) 



Prod. R Prod. B Prod. C Prod. D 
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Ensemble 

Tutte le funzioni utili, correlate 



là Controle X' 


|- 

ITALWARE 


_ Società Italiana Software - 


SOLUZIONI IN PUGNO 

ITALWARE SOCIETÀ ITALIANA SOFTWARE PALAZZO BORROMINI MILANO 2-20090 SEGRATE 






































































il Database veramente 
patente per /Ipple // 


Ù 

n 


otente: Superbase ti permette di 
lavorare contemporaneamente con 
15 files diversi, contenenti un numero 
illimitato di schede (la limitazione è 
dovuta solo alle disponibilità di spazio 
su dischetto). 

A sua volta ogni scheda potrà 
contenere fino a 127 campi 
di lunghezza massima 255 caratteri 
(con limitazione di 1000 caratteri 
per scheda). 



fi 


rogrammabile: con Superbase è 
possibile creare programmi che 
richiamano in diversa sequenza 
i differenti files, e che creano nuovi 
documenti con i dati acquisiti 
dalle varie schede presenti 
nel database. E' possibile eseguire 
operazioni aritmetiche sui dati 
numerici presenti nelle schede e 
creare programmi di fatturazione, 
per esempio, con richiamo automatico 
dei dati del cliente e dei prodotti, e con 
esecuzione automatica dei calcoli. 


Database dalle 4 



Pratico: Superbase è potente 
ma non difficile da usare. 

Uiene fornito completo di manuale 
e di cassetta audio di 
autoapprendimento in italiano 
per imparare a utilizzarlo 
direttamente sul tuo Hpple //. 


rovaio: nella pagina a lato 
pubblichiamo l'elenco dei rivenditori 
presso i quali potrai trovare 
e provare il Superbase. 
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Se sei abituata 
a chiedere 
sempre di più dal 
tuo computer, 
SUPERB/ISE 
è il database 
che fa per te. 







□ Sì, desidero acquistare il programma Superbase a lire 380.000 
+Iva. Scelgo la seguente formula di pagamento: 

□ Accludo assegno non trasferibile di lire 448.800 (380.000. + 
Iva) intestato a Editronica srl 

□ Accludo ricevuta di versamento su conto corrente postale n. 

19740208 intestato a Editronica srl, di lire 448 800 

* (380.000 +Iva) 

Nome e Cognome.:........... 

Indirizzo.Cap. 

Città.Prov.. 


!► 


Ritagliare e spedire in busta chiusa a: Editronica srl. 
Corso Monforte 39, 20122 Milano. 











































Col passar del tempo è assai facile confondere la dos 3.3 Jy 

varicella di un figlio con il morbillo dell’altro, dimenticare Kf/zeSi 

se sono stati vaccinati, scordare qual era quella * PPLE //c 

meravigliosa terapia che vorremmo ripetere... Non esiste 
purtroppo più il vecchio medico di famiglia, bonario e 
saggio, che ricorda tutto di tutti. C’è però APPLIMEDIC, 
che non sa fare diagnosi, ma ha in compenso una 
memoria imbattibile... soprattutto in fatto di conti! 


Metti un medico 
in famiglia 


P rovate a chiedere a vostra madre 
se avete avuto la varicella: vi dirà 
che sì, ma forse no, forse era vostra 
sorella, degli orecchioni si ricorda be¬ 
nissimo, ma sulla varicella non ci giu¬ 
rerebbe... Provate a tirar fuori tutti i 
cartellini e tesserini relativi alle vacci¬ 
nazioni dei bambini: dieci a uno che 
qualcuno è andato perso, e non sapre¬ 
te mai la verità sui richiami dell’antite¬ 
tanica. Provate a ricordarvi quali era¬ 
no quelle ottime pillole che in due ore 
vi hanno guarito da una tremenda ce¬ 
falea l’anno scorso: quasi impossibile, 
vero? 

La maggior parte delle persone fa 
affidamento sul medico di famiglia per 
avere queste informazioni, ma accade 
spesso che all’assistenza medica prov¬ 
vedano diversi specialisti, e può darsi 
che le vaccinazioni vengano fatte a cu¬ 
ra dell’autorità scolastica. Appartiene 
ormai al passato la figura del bonario 
dottore che provvedeva alla completa 
assistenza sanitaria di tutti i compo- 



<C> 1985 BY APPLICANDO & MICROSPARC INC 
PREMI UN TASTO PER INIZIARE. 


La videata di presentazione 


nenti della famiglia. 

Certo che, se di questa razza bene¬ 
detta purtroppo in via di estinzione 
esiste ancora qualche esemplare, AP- 
PLIMEDIC fa proprio per lui: nessu¬ 
no meglio di un medico di famiglia, 
infatti, può coglierne i vantaggi; una 
serie di file, famiglia per famiglia, con 
tutti i dati, le anamnesi, le terapie per i 
vari membri... 

APPLIMEDIC è un programma in¬ 
teso a tener nota, su base annuale, 
delle informazioni riguardanti l’assi¬ 
stenza sanitaria ricevuta dai vari mem¬ 
bri della famiglia e le medicine che 
sono state loro prescritte, e delle rela¬ 
tive spese. Elenca le spese su base per¬ 
sonale, e riferisce su una sola persona, 
oppure collettivamente sull’intera fa¬ 
miglia. 

A parte l’ovvio vantaggio della pos¬ 
sibilità di avere i dati completi delle 
spese sanitarie quando si deve fare la 
denuncia dei redditi, APPLIMEDIC 
provvede una documentazione impor¬ 
tante per la famiglia. Lo si può usare 
per stampare un elenco delle medicine 
prescritte a una persona della fami¬ 
glia, da portare allo studio del dottore. 
La lista può essere molto importante 
per il medico che prescrive un’ulterio¬ 
re cura, e che non disponendo di quel¬ 
le informazioni potrebbe inconsape¬ 
volmente prescrivere medicamenti tali 
da interagire negativamente con altri 
che il paziente sta già prendendo. (Il 
problema può essere particolarmente 
serio nelle persone anziane, che spes¬ 
so prendono medicine in sovrabbon¬ 
danza,) Inoltre l’elenco permetterà al 


farmacista di controllare le potenziali 
interazioni tra medicina e medicina. 

Un altro importante impiego del 
programma è l’accurata registrazione 
delle informazioni su vaccinazioni e 
inoculazioni. Chi ha bambini sa quan¬ 
to arduo sia tener traccia delle malat¬ 
tie di ognuno di loro e delle relative 
cure. APPLIMEDIC non smarrirà né 
metterà mai al posto sbagliato queste 
informazioni di importanza vitale. 


APPLIMEDIC è interamente pilo¬ 
tato da menù ed è quanto mai facile da 
usare. Le scelte vengono fatte median¬ 
te le frecce, spostando una riga mobile 
inversa che scorre sulle opzioni del 
menù. Si fa la scelta definitiva pre¬ 
mendo il tasto <RETURN>. (Questa 
routine del menù, completa di alcuni 
dei nomi di variabile, proviene dall’u¬ 
tility AUTOSCHERMO, pubblicata 
sul n. 15 di Applicando.) Si tratta di un 
autentico programma a due dita: la 
sola digitazione occorrente nel corso 
del programma è quella relativa all’in¬ 
troduzione dei dati e aH’eliminazione 
dei file. 

Le sezioni che seguono spiegano i 
vari moduli e opzioni di APPLIME- 
DIC e servono come istruzione per il 
suo impiego. Quando eseguirete per la 
prima volta APPLIMEDIC comparirà 
la pagina d’intestazione e riceverete 
l’invito PREMI UN TASTO QUA¬ 
LUNQUE PER COMINCIARE. Lo 
schermo si pulirà e comparirà un altro 


■■■■■■■■■ 




Come usarlo 
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messaggio: INTRODUCI L’ANNO 
CHE INTERESSA. A questo punto 
introdurrete l’anno in corso, 85. Qual¬ 
siasi carattere non valido sarà respinto 
con un bip, e apparirà di nuovo la ri¬ 
chiesta. Il disco girerà per un po’, alla 
ricerca di un file corrispondente all’an¬ 
no scelto. Se non riesce a trovare un 
tale file genera automaticamente il file 
HEADER.85. Quando questa opera¬ 
zione è completata verrà visualizzato il 
menù principale. 


La creazione dei file 
dei pazienti 

Poiché si tratta della prima volta sa¬ 
rete invitati a introdurre qualche dato. 
La scelta logica sul mepù è INTRO¬ 
DURRE NUOVI DATI. Il cursore si 
trova già su questa opzione, e quindi 
basta premere il tasto <RETURN> 
come suggerito nel prompt alla base 
dello schermo. Adesso apparirà sullo 


schermo la pagina di INPUT DEI DA¬ 
TI, pronta per l’introduzione del NO¬ 
ME DEL PAZIENTE. Battete il no¬ 
me GIOVANNI e premete <RE- 
TURN>. Delusione: il programma fa 
tornare.al menù principale, con il cur¬ 
sore sulla riga CREARE NUOVO FI¬ 
LE PAZIENTE, facendo così sapere 
che si deve creare un file per ciascun 
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paziente prima di introdurre i dati. 

Premete di nuovo <RETURN> 
per introdurre la funzione CREARE: 
adesso potete inserire GIOVANNI, 
quando viene chiesto un nome. Il di¬ 
schetto gira un momento per scrivere 
il file. Battete poi FILES per accertar¬ 
vi che Giovanni sia davvero sul di¬ 
schetto e nel computer come paziente. 
Quindi inserite GIOVANNA. Per il 
momento basteranno due nomi su cui 
lavorare, e quindi premete <RE- 
TURN> per tornare al menù princi¬ 
pale. Nota : poiché il nome introdotto 
è usato come nome di file deve conte¬ 
nere solo lettere e punti per mantene¬ 
re la compatibilità con il ProDOS. 


L’introduzione dei dati 

Il cursore è su INTRODURRE 
NUOVI DATI, e quindi premete 
<RETURN> per andare di nuovo a 
quella routine, e poi nuovamente il 
nome GIOVANNI. Questa volta il di¬ 
schetto gira e fa avanzare alla voce 
della DATA. Inserite due cifre per il 
giorno e poi due cifre per il mese, sen¬ 
za introdurre caratteri di delimitazio¬ 
ne come la barra (/) o la lineetta (-): 
penserà il computer ad aggiungere le 
barre. 

Adesso inserite ROSSI alla voce 
DR/CLINICA. Per DIAGNOSI inse¬ 
rite influenza, e digitate una cifra in 


lire che sembri adatta per l’ONORA- 
RIO. Il Dr. Rossi ha deciso che la 
vostra influenza non è affatto grave e 
vi ha prescritto qualche aspirina: inse¬ 
ritelo nell’area PRESCRIZIONE. 
Dette aspirine vi sono assegnate per 
tre, dieci, sette giorni? Due, quattro, 
otto al giorno? Un’area genericamen¬ 
te chiamata QUANTITÀ’ mette a vo¬ 
stra disposizione uno spazio dove po¬ 
tete inserire un numero; se non digite¬ 
rete nulla, comparirà automaticamen¬ 
te uno 0. E infine inserite una cifra 
ragionevole come spesa per l’ultima 
voce. Il disco gira di nuovo per un 
attimo mentre le nuove informazioni 
vengono scritte sul dischetto. 

Quando tornate al prompt del nome 
battete per Giovanna delle nuove in¬ 
formazioni, nello stesso ordine seguito 
per Giovanni: la data appropriata, il 
nome di un medico o di una clinica, il 
disturbo diagnosticato, l’onorario pa¬ 
gato e la terapia prescritta, con quanti¬ 
tà e costo. Con questo si dovrebbero 
completare due voci, una per Giovan¬ 
ni e una per Giovanna. Adesso battete 
FINE come risposta alla richiesta del 
nome. Il dischetto gira per un attimo e 
ritorna al menù principale. A questo 
punto può darsi che vogliate introdur¬ 
re almeno un altro record completo, 
compilando di vostra scelta dati per 
Giovanni o per Giovanna da utilizzare 
nelle opzioni che seguono. 

Scegliete l’opzione VEDERE AT¬ 
TUALI NOMI PAZIENTI sul menù 
principale mettendo il cursore sopra 
l’opzione VEDERE e premendo 
<RETURN>. Questo dà semplice- 
mente una lista di tutti i pazienti elen¬ 
cati per quel determinato anno. 

Controllo dati 

Adesso premendo <RETURN> o 
<ESC> tornerete al menù principale. 
Spostate il cursore sopra l’opzione 
CERCARE/ORDINARE/EDITA- 
RE e premete <RETURN>: avrete 
ora sullo schermo il menù CERCA- 
RE/ORDINARE/EDITARE con il 
cursore sulla prima opzione, ESAMI- 
NARE/EDITARE RECORD INDI¬ 
VIDUALI. Eseguite questa opzione e 
scegliete una persona, Giovanni, tan¬ 
to per cambiare. Scegliete questo no¬ 
me con le frecce e premete <RE- 
TURN>: avrete adesso sullo schermo 
il primo record di Giovanni. 

Notate i prompt alla base dello 
schermo. Premete E e <RETURN>, 
andando così nel modo editing con il 
cursore sulla voce DATA. La data va 
bene e quindi premete <RETURN>. 



Il menù principale. Quando si usa il programma per la prima volta bisogna 
innanzitutto creare un nuovo file paziente. 



I dati da inserire, oltre al nome del paziente e alla data, sono il nome del 
medico, la diagnosi, la terapia e le relative spese. 
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rcippkz computer 


Gruppo 


DimpuShnp 


Apple II e 

monitor Ile e supporto 
Disk drive aggiuntivo, 
Mouse. 


m 



Omaggio: stampante da 8" 
grafica a colori. 


Macintosh 

512K RAM 


Omaggio: stampante grafica 

da 8" bidirezionale, 
120 cps, 

oppure accessori di 
uguale importo. 



Apple Ile 

128K RAM, 80 colonne 
Duodisk 



Omaggio: monitor 12" 
a fosfori verdi 


sincilair- 

ZX Spectrum 48K 



8 cassette originali, 

2 libri in italiano, 
supergaranzia Rebit. 

£. 365.000 iva inclusa 



SPECTRAVIDEO ROMA 


Commodore 
pappié computar 

* Olivetti 


• Via Nomentana 265/273 

Tel. 8450078 

• Via L. Bonincontri 105/107 

Tel. 5140792 

• Via Famagosta 33 

Tel. 385408 


Ulteriori informazioni saranno fornite presso i punti vendita. 




































Adesso siete sulla voce DR/CLINI- 
CA. In realtà Giovanni ha visto il Dr. 
Rizzi, non il Dr. Rossi: battete allora 
Rizzi al posto della voce esistente. 
Scendete lungo lo schermo con ripetu¬ 
ti <RETURN> fino a quando il cur¬ 
sore è sull’ultima voce, scoprendo, 
sempre per allenamento, che anche il 
costo della cura è sbagliato. Battete 
una barra (/) e poi <RETURN>. Tut¬ 
te le voci tornano ai loro valori origi¬ 
nali e il cursore è di nuovo sulla data. 


Questa volta lasciate immutate tutte 
le voci tranne COSTO DELLA CU¬ 
RA. Cambiate questa voce con un’al¬ 
tra cifra, scorrete fino all’ultima voce e 
poi premete il <RETURN> finale. Il 
disco gira, scrivendo le nuove infor¬ 
mazioni nel file di Giovanni. Dopo l’e¬ 
diting verrete riportati al display 
CERCARE/ORDINARE/EDITA- 
RE: battete Q <RETURN> per fini¬ 
re e tornare al menù CERCARE/OR- 
DINARE/EDITARE. 


Spostate il cursore sull’opzione 
ESPLORARE CAMPI DATI e pre¬ 
mete <RETURN>; dovete scegliere 
adesso un campo di dati da esplorare. 
Portate il cursore su DIAGNOSI e 
premete <RETURN>. Compare il 
prompt INTRODUCI VALORE 
STRINGA dove, in questo caso, do¬ 
vete introdurre INFLUENZA. Quan¬ 
do siete invitati a scegliere fra un unico 
paziente e tutti i pazienti, scegliete 
PER OGNI PAZIENTE. Il disco gira 


LISTATO 1 - APPLIMEDIC 


10 REM aaaaaaaaaaaaaaaaaaaaaaaa 

20 REM * APPLIMEDIC * 

30 REM a DI MARK CRAVEN a 
40 REM * COPYRIGHT (C) 1985 * 

50 REM * BY APPLICANDO & * 

60 REM * MICROSPARC INC. * 

70 REM a*********************** 

80 PRINT CHR$ (21): TEXT : HOME 

90 QNERR GOTO 6260: REM CONTROLLA TUTTI GLI ERRORI 

100 GOSUB 1280: REM INTESTAZIONE 

110 D$= CHR$ (4) 

120 DIM FL*(15).M$<50,8) 

130 YR$ = HOME :V = 10:H = 24: VTAB V: HTAB 1 : CALL - 
868: PRINT 'INTRODUCI L'AWO CHE INTERESSA GOSUB 89 
0 

140 FOR I = 1 T0 2: GET YR$(I): PRINT YR$(I);: GOSUB 920:YR 

i = m ♦ YR$(I): NEXT 

150 GOSUB 900: 1F ER = 1 THEN ER = 0: GOTO 130 
160 FL$ = 'INTESTAZIONE* + + YR$ 

170 GOSUB 5780: REM LEGGE INTESTAZIONE-CARICA SCROLLOFF 

180 IF MI = 0 AND CS = 8 THEN RETURN 

190 GOSUB 200: GOTO 290 

200 FOR I = 0 TO 8: READ M(M0,I): NEXT 

210 FOR I = 1 T0 8: READ MIM1,I): NEXT 

220 FOR I = 1 T0 4: READ MIM3,1): NEXT 

230 FOR I = 1 T0 4: READ MtM5,I): NEXT 

240 FOR 1 = 1 T0 2: READ MIM9,I): NEXT 

250 FOR I = 1 T0 8: READ H7.<I): NEXT 

260 FOR I = 1 TO 8: READ 17.(1): NEXT 

270 FOR I = 0 TO 2: READ HL*(I): NEXT 

280 RETURN 

290 C = 1 

300 HT = 10:VX = 1:HLX = 1:S = 8:M1 = 0:M2 = 0: CALL 54915: 

REM S=NUMER0 DELLE OPZIONI DEL MENU' 

310 VSX = 2 
320 GOTO 360 

330 VTAB HLX 4 V/. 4 OS 4 OS a (S < 10): HTAB HT: PRINT MIM 
MI,OS) 

340 VTAB HLX + V/ 4 CS 4 CS a (S < 10): INVERSE : HTAB HT: 

PRINT MIMMI,CS): N0RMAL 
350 RETURN 

360 TEXT : CALL 820:CS = 0: INVERSE : GOSUB 690: GOSUB 720 

370 CS = C: REM SCELTA CORRENTE 

380 FOR M2 = 1 T0 S: 1F M2 = CS THEN IWERSE 

390 VTAB HL7. 4 VSX a M2 4 V/. 

400 HTAB HT: PRINT MIMMI ,M2) : N0RMAL 
410 NEXT 

420 VTAB 23: IWERSE : PRINT NORMAL : PRINT ' ':: IN 

VERSE : PRINT NORMAL : PRINT ' PER SCEGLIERE-':: 

IWERSE : PRINT 'RETURN';: NORMAL : PRINT ' PER ESEGUI 
RE' 

430 VTAB 24: HTAB 3: PRINT 'PUOI USARE ANCHE LE FRECCE SU 0 
GIU' * 1 * * 4 :: P0KE - 16368.0 

440 K = PÉEK ( - 16384): IF K < 128 THEN 440 
450 P0KE - 16368,0 :K = K - 128: IF K < > 8 AND K < ) 21 

AND K < > 11 AND K < >10 AND K < >13 THEN 440: REM 

SOLE OPZIONI 
460 OS = CS 

470 IF K = 8 OR K = 11 THEN CS = CS - 1:CS = CS a (CS > 0) 

4 S a (CS = 0): GOSUB 330: GOTO 440: REM FRECCIA SU 0 

SINISTRA 

480 IF K = 21 OR K = 10 THEN CS = CS 4 1;CS = CS a (CS ( = 
S) + (CS = S 4 1); GOSUB 330: GOTO 440: REM FRECCIA D 
ESTRA 0 GIU' 

490 IF MI = 0 THEN POKE 972,CS 


500 0NM1 GOTO 510.520.530,540.550,560.570.580,590 
510 QN CS GOTO 1520,2500,2740,4530,5110,5470,6140,5690 
520 GOTO 2920 

530 ON CS GOTO 2850,3280.3820.290 

540 GOTO 3490: REM NOME PERSONALE PER RICERCA/ORDINAMENTO 
550 ON CS GOTO 4580,4580.4580,290 

560 GOTO 3330: REM TUTTE LE OPZIONI TORINO A ESPLORAZ10N 
E PER CAMPO 

570 0N CS GOTO 3480,3600 

580 GOTO 3470: REM SCELTA INDIVD/FMIL Ml=8 

590 0N CS GOTO 4610,4670: REM Ml=9 


600 

REM 



610 

REM 

aaaaaaaaaaaaaaaaaaaaaa 

620 

REM 

a 

a 

630 

REM 

a 

INIZIO DELLA a 

640 

REM 

a 

SEZIONE a 

650 

REM 

a 

SUBROUTINE a 

660 

REM 

a 

a 

670 

REM 

aaaaaaaaaaaaaaaaaaaaaa 

680 

REM 




690 VTAB 1: HTAB 20 - LEN (MIMMI ,M2>) / 2: PRINT MIMMI ,M 
2):: RETURN 

700 FOR I = 38 TO 0 STEP - 1: POKE 32,1: POKE 33,40 - I: H 
OME : NEXT : RETURN 

710 POKE 32.0: FOR I = 0 TO 39: POKE 33,1 4 1; HOME : NEXT 
: RETURN 

720 NORMAL : VTAB 2: HTAB 14: PRINT = 19';YR*: RETURN 
730 FOR I = 1 TO LEN <X$) 

740 IF ASC ( MID* <X*,I,1>) < 65 AND ASC ( MID$ <X*,I,1)) 
< > 32 AND ASC ( MIDI (XI,1,1)) ( > 46 THEN HTAB 1 

: VTAB 2 a M2 4 3 - 2 a (EDX > 0): CALL - 868: PRINT ' 

SOLO LETTERE":: GOSUB 1030:ER = 1: HTAB 1: CALL - 868 
: HTAB 1:1= LEN (X*) 

750 NEXT I: RETURN 

760 IF M2 = 1 AND LEN <X$> > 12 THEN HTAB 1 : VTAB 2 * M2 

4 3 - 2 a (ED*/. > 0): CALL - 868: PRINT 'TROPPO LUNGO'; 

: GOSUB 1030:ER = 1: HTAB 1: CALL - 868: HTAB 1 
770 RETURN 

780 VTAB 2 a M2 4 3: FOR J = 1 TO 1 4 LX(M2): HTAB J: PRINT 
CHR$ (95);: NEXT : HTAB 1: RETURN 
790 IF M2 > 1 AND LEN (I$(M2)) > (LX(M2) 4 1) THEN HTAB 1 
: VTAB 2 a M2 4 3 4 (ED.V. a - 2): CALL - 868: PRINT 'V 
OCE LUNGA';: GOSUB 1030:ER = 1 : HTAB 1 : CALL - 868: HT 
AB 1 

800 RETURN 

810 FOR J = 1 TO LEN (XI): IF ASC < MIDI (XI.J.D) < 48 0 
R ASC ( MIDI (XI.J.D) > 57 THEN CALL 85338: CALL 653 
38: VTAB 2 * K 4 3 - 2 * (EDX > 0): HTAB HX(K): CALL - 
888: PRINT 'NON VALIDA*;: GOSUB 1030:ER = 1 : HTAB HX(K 
): CALL - 888:J = LEN (XI) 

820 NEXT : RETURN 

830 FOR J = 1 TO LEN (XI): IF ASC ( MIDI (XI.J.D) < 48 0 
R ASC ( MIDI (XI.J.D) ) 57 THEN CALL 85338: CALL 853 
38: VTAB 2*M2 + 3-2* (EDX ) 0): HTAB 1: CALL - 88 
8: PRINT *N0N VALIDA*;: GOSUB 1030:ER = 1: HTAB 1: CALL 
- 888:J = LEN (XI) 

840 NEXT : RETURN 

850 FOR J = 1 TO LEN (XÌ):YI = MIDI (XI.J.D 
880 IF ASC (Yl) < 48 AND ASC (Yl) ( > 48 OR ASC (Yl) > 
57 WD ASC (Yl) < > 48 THEN HTAB 1 : VTAB 2 * M2 4 3 
- 2 * (EDX ) 0): CALL 85338: CALL - 888: PRINT 'DATO E 
RRATO!* ; : GOSUB 1030:ER = 1 : HTAB I : CALL - 888:J = L 
EN (XI) 

870 NEXT : RETURN 

890 VTAB V: HTAB 32: PRINT *19*; CHRI (95); CHRI (95);: HTA 
B H 4 10: RETURN 
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di nuovo, leggendo ciascun file di pa¬ 
ziente e controllando se ce ne sia uno 
corrispondente. Quando ne ha trovato 
uno, questo viene visualizzato, con un 
totale progressivo delle corrisponden¬ 
ze trovate. Dopo il ritrovamento di 
ciascuna corrispondenza, potete stam¬ 
pare, finire o continuare. In questo 
esempio si troverà una sola corrispon¬ 
denza, con il campo di esplorazione 
visualizzato in modo lampeggiante, a 
rammentarvi la scelta fatta. 


Prescrizioni e spese 

Dopo l’esplorazione venite ricon¬ 
dotti al menù CERCARE/ORDINA- 
RE/EDITARE. Questa volta sceglie¬ 
te l’opzione LISTARE PRESCRI¬ 
ZIONI PAZIENTE ed eseguitela con 
<RETURN>. Scegliete il paziente da 
visualizzare ed eseguite premendo 
<RETURN>. Scoprirete che è molto 
utile portare con voi questa lista, 
quando andate dal medico o dal far¬ 


macista. 

Seguite i prompt e tornate al menù 
principale, scegliendo questa volta 
l’opzione TOTALI DELLE SPESE. 
Ormai dovreste avere una discreta fa¬ 
miliarità con il sistema, e quindi passa¬ 
te da soli per le tre opzioni, facendo le 
scelte necessarie per un unico paziente 
o per tutti, per vedere come la cosa 
funziona. Completata l’operazione 
tornate ancora una volta al menù prin¬ 
cipale. 


900 FOR J = 1 TO LEN (YR$) : IF ASC ( M1W <YR$,JJ)> < 48 
OR ASC ( M1M (YW.J.l)) > 57 THEN HTAB H: VTAB V: C 
ALL - 868: PRINT B SOLO NUMERI G0SU6 1030 :ER = 1: 
HTAB H: CALL - 868:J = LEN <YR$) 

910 NEXT J: RETURN 

920 IF ASC (YR$(D) < 48 OR ASC (YR$(D) ) 57 THEN CALL 
65338: CALL 65338:YR* = "": POP : GOTO 130 
930 RETURN 

940 IF LEN <X$) > 9 THEN CALL 65338: CALL - 868: PRINT 1 
m 9 CIFRE 1 ;: GOSUB 1030:ER = 1 : HTAB 1 : CALL - 868: 
RETURN 

1010 IF M2 = 0 AND LEN (X$) > 9 THEN PRINT "*********" 
1020 RETURN 

1030 POKE - 16368,0: GET G$: RETURN : REM ERRORE VISUALZ 
ZAT0-C0NTINUA 

1040 POKE 33,4: POKE 32,35: POKE 34.22: POKE 35.22: HOME : 

RETURN : REM IMPOSTA FINESTRA INPUT PER DISPLAY 
1050 POKE 32.0: POKE 33,40: POKE 34,0: POKE 35,24: RETURN : 
REM DI NUOVO FINESTRA INTERA 

1060 VTAB 23: HTAB 1: PRINT "^«STAMPA <ESC>=MENU'PRINC. < 
RTN>=C0NT"; : 

1070 GET X*: POKE - 16368.0 

1080 IF X$ = , S“ THEN VTAB PEEK (37) - 1: GOSUB 6500: GOT 
0 1060 

1090 IF X$ = CHR$ (13) THEN RETURN 

1100 IF X$ = CHR$ (27) THEN MI = 0:M2 = 0: POP : GOTO 290 

1110 GOTO 1060 

1120 POKE 33.40 - HX(M2): POKE 32,HX(M2) - 1: POKE 34,2 * M 
2 ♦ 2: POKE 35,2 * M2 ♦ 3 
1130 RETURN 

1140 IF X$<J) = CHR’J (27) AND EDX = 1 THEN U(K) = X$(J): 
POP :J = 3: POP : GOTO 4140 

1150 IF X$(J) = CHR* (27) THEN POP : POP :M1 = 0:M2 = 0: 

GOTO 290: REM CONTROLLA SE ESC 
1160 IF <X$(J) = CHR* (13) OR XI = CHR* (27) OR X*(J) = 1 
/■) AND EDX = 1 THEN I$(K) = X$(J): POP :J = 3: POP : 
GOTO 4140 
1170 RETURN 

1180 IF X$(J) = CHR* (13) THEN GOSUB 1200: POP : CALL 653 
38: CALL 65338: GOTO 1860 
1190 RETURN 

1200 POKE 35,24; POKE 34,0: POKE 32.0: POKE 33,40: RETURN 
1210 IF LEFT* (I$(M2),4) = •FINE 1 THEN MI = 0:M2 = 0: POP 
: GOTO 290 
1220 RETURN 

1230 CALL 857: VTAB 8: FOR I = 1 TO 40: PRINT 1 * 1 :: NEXT : 
PRINT : PRINT "NESSUNA INFORNAI ONE PER QUESTA PERSONA 
PRINT 'DEVI SCEGLIERE: 1 

1240 HTAB 11: IWERSE : PRINT '<INTRODURRE NUOVI DATI) 1 : NO 
RMAL : PRINT ‘SUL MENU 7 PRINCIPALE 1 : PRINT : FOR I = 1 
TO 40: PRINT "*":: NEXT : POKE - 16368,0: VTAB 20: P 
RINT 'PREMI UN TASTO QUALUNQUEGET X*: GOTO 290 
1250 REM 

1260 REM ** INTESTAZIONE ** 

1270 REM 

1280 IWERSE : HTAB 1: FOR I = 1 TO 37: PRINT NEXT 
1290 PRINT 

1300 HTAB 1: PRINT "*" TAB( 37) 1 * 1 
1310 HTAB 1 : PRINT "*"; SPC( 7)APPLIMEDIC SPC( 
IO); 1 * 1 : 

1320 FOR I = 1 TO 5 

1330 HTAB 1: PRINT "*• TAB< 37) 1 * 1 

1340 NEXT I 

1350 HTAB 1: FOR I = 1 TO 37: PRINT 1 * 1 ;: NEXT 
1360 VTAB 5: HTAB 18: PRINT "DI 1 : VTAB 7: HTAB 12: PRINT "M 
ARK R. CRAVEN": VTAB 9 
1370 NORMAL 


1380 PRINT :H = 13 

1390 PRINT ! HTAB H: INVERSE : PRINT 'S'; : NORMAL : PRINT 1 
PESE 1 : HTAB H: INVERSE : PRINT "M"s : NORML : PRINT 'E 
DICHE 1 

1400 HTAB H: INVERSE : PRINT "C 1 ; : NORMAL ; PRINT "OMPILAZI 
ONE 1 : HTAB H: INVERSE : PRINT 'I 1 ;: NORMAL : PRINT 'NF 
ORMAZIQNI 1 

1410 HTAB H: IWERSE : PRINT "D'ss NORMAL : PRINT "ETTAGLIA 
TE 1 

1420 VTAB 21: PRINT "(C) 1985 BY APPLICO & M1CR0SPARC IN 

C 1 

1430 VTAB 23: PRINT 1 PREMI UN TASTO PER INIZIARE..";: G 
ET X$: POKE - 16368,0: RETURN 


1440 

REM 

************* 

1450 

REM 

* 

* 

1460 

REM 

* AGGIUNGE 

* 

1470 

REM 

* NUOVI 

* 

1480 

REM 

* DATI 

* 

1490 

REM 

* 

* 

1500 

REM 

************* 

1510 

1520 

REM 

S = 

8:M1 = 1:N1X 

= ( 


1530 TEXT : CALL 768: HTAB 1: VTAB 24: INVERSE 
1540 FOR M2 = 1 TO 8: PRINT MU$(M1,M2): PRINT : NEXT : PR1N 
T : PRINT : PRINT :M2 = 1:M1 = 0: GOSUB 690:M1 = 1 : NO 
RMAL : GOSUB 720 
1550 GOTO 1570 

1560 FOR I = 5 TO 8 STEP 3: VTAB 2 * I ♦ 3: HTAB H5S(I) - 1: 
NEXT 

1570 FOR M2 = 1 TO S 

1580 IF M2 = 2 THEN A$ = 'ESC " 

1590 VTAB 24: HTAB 8: PRINT "INTRODUCI 1 ; : INVERSE : PRINT 
A*;: NORMAL : PRINT 1 PER FINIRE 1 :: HTAB 1 
1600 A$‘ = "FINE 1 : VTAB 2 * M2 ♦ 3: HTAB HX(M2) 

1610 I$(M2) = 11 

1620 0N M2 GOSUB 1720,1860,1720,1720,2040,1720,2040,2040 
1630 NEXT M2 
1640 GOTO 2190 
1650 REM 

1660 REM ******************** 

1670 REM * * 

1680 REM * INPUT ALFAB. * 

1690 REM * * 

1700 REM ******************** 

1710 REM 

1720 GOSUB 1120: GOSUB 780 

1730 INPUT "";I$(M2): IF I$(M2) = 11 THEN GOSUB 1200: GOTO 

1720 

1740 IF I$(M2) = "FINE" THEN MI = 0:M2 = 0: GOTO 290 
1750 GOSUB 790: IF ER = 1 THEN ER = 0: GOTO 1720 
1760 X* = IKM2): GOSUB 730: GOSUB 760: IF ER = 0 THEN GOS 
UB 2270: GOTO 1780: REM CONTROLLA ESISTENZA NOME 
1770 IF ER = 1 THEN ER = Q:I*(M2) = ": GOSUB 1200: GOTO 17 
20 

1780 HTAB 1: VTAB 2 * M2 ♦ 3: PRINT LEFT$ <1*(M2),LX(M2) * 
1);: GOSUB 1200: RETURN • 

1790 REM 

1800 REM **************** 

1810 REM * * 

1820 REM * INPUT DATA * 

1830 REM * * 

1840 REM **************** 

1850 REM 

1860 X$ = "": GOSUB 1120: GOSUB 780: HTAB 1: PRINT CHR$ (3 
2);: 

1870 J = 1: GET X$(J): GOSUB 1140:X* = X$(J): PRINT X$: 

1880 FOR J = 1 TO 3: GET X*(J): GOSUB 1140: PRINT X$(J);:X* 

( continua) 


23 







Eliminazione 
e cambio anno 

Scegliete sul menù principale ed ese¬ 
guite l’opzione ELIMINARE FILE 
PAZIENTE ESISTENTE. Qui dove¬ 
te effettivamente battere il nome che 
volete eliminare: Giovanna. Se batte¬ 
te un nome non valido, come Carla, 
sarete informati che non c’è alcun no¬ 
me del genere nei file. Confermate 
con S che volete effettivamente elimi¬ 
nare Giovanna dal file. Il disco gira 
per un momento, e il file di Giovanna 
è sparito per sempre. Quando tornate 
al menù principale, scegliete VEDE¬ 
RE ATTUALI NOMI PAZIENTI 
per verificare che il file di Giovanna 
sia stato effettivamente eliminato. 

Spostate il cursore su CAMBIARE 
ANNI ed eseguite. La videata dice 
qual è l’anno in corso e chiede l’anno 
nuovo da scrivere, come ha fatto all’i¬ 


nizio del programma. Supponiamo 
che vogliate introdurre anche tutte le 
informazioni dell’anno passato, per 
vedere quali siano state le spese. Basta 
introdurre 84 come anno. Come in 
precedenza sarà necessario creare un 
file per ciascuna persona prima di po¬ 
ter introdurre i dati. 

Adesso, a meno che non vogliate 
giocare ancora un po’ con il program¬ 
ma, continuate con la routine ELIMI¬ 
NARE FILE PAZIENTE ESISTEN¬ 
TE ed eliminate il resto dei file creati 
per ciascun anno in base a queste spie¬ 
gazioni (a meno che, s’intende, non 
abbiate adoperato informazioni vali¬ 
de). Tornate al menù principale e spo¬ 
state il cursore su USCIRE DAL 
PROGRAMMA. Eseguite con <RE- 
TURN> per lasciare l’APPLIME- 
DIC. 

Noterete forse che tutti i sommari e i 
totali dei dati vengono generati senza 
alcuna digitazione vera e propria. Ba¬ 


stano le frecce e il tasto <RE- 
TURN>. Si hanno come conseguenza 
introduzioni rapide, efficienti e relati¬ 
vamente esenti da errori. 

L’introduzione 
dei programmi 

Il pacchetto di programmi APPLI- 
MEDIC comprende due programmi: 
il programma principale in Basic, AP- 
PLIMEDIC (listato 1), e il program¬ 
ma binario SCROLLOFF, che serve 
ad aggiungere a un programma co¬ 
mandi HOME d’effetto. 

Per digitare APPLIMEDIC inserite 
dapprima il programma in Applesoft 
visibile nel listato 1 e salvatelo su di¬ 
schetto con il comando: 

SAVE APPLIMEDIC 

Ricorrete al Monitor battendo 
CALL-151 per introdurre il codice in 
linguaggio macchina di SCROL- 


= XI + XKJ): IF J = 1 OR J = 3 THEN PRINT = 

XI + V" 

1890 NEXT : PRINT YRI;: 

1900 IKM2) = XI + YRI 

1910 1F ED7. = 1 THEN RETURN : REM FLA6 EDITING 
1920 X* = LEFTI (XI,2) ♦ MIDI (X$.4,2) 

1930 IF UAL ( LEFTI <X$,2)) > 31 OR UAL ( RIGHTI (XI,2» 

> 12 THEN 1860 
1940 G0SUB 830 

1950 IF ER = 1 THEN ER = 0: GOTO 1860 
1960 UTAB 7: HTAB 2: PRINT IKM2); 

1970 GOSUB 1200: RETURN 
1980 REM 

1990 REM a*#*##*****#**### 

2000 REM * * 

2010 REM * INPUT NUMERI * 

2020 REM * * 

2030 REM ***************** 

2040 GOSUB 1120: GOSUB 780 

2050 INPUT ■■ ;II(M2) 

2060 GOSUB 1210: REM 'FINE* 7 

2070 IF M2 = 7 THEN 2130: REM QUANTITÀ 

2080 XI = IKM2): IF XI = "" THEN XI = "0" 

2090 GOSUB 850: GOSUB 2170 

2100 GOSUB 940: GOSUB 2170 

2110 IKM2) = XI 

2120 HTAB 1: UTAB 2 * M2 ♦ 3: PRINT ♦ IKM2);: GOSUB 1200: 
RETURN 

2130 X* = IKM2): IF XI = BB THEN PRINT :IKM2) = * 0": GO 
TO 2160 

2140 GOSUB 850: GOSUB 2170 

2150 IF UAL (IKM2)) > 12 THEN : CALL 65338: GOTO 2040 

2160 HTAB 1 : UTAB 2 * M2 ♦ 3: PRINT B B ♦ IKM2);: GOSUB 12 

00: RETURN 

2170 IF ER = 1 THEN ER = 0: POP : GOSUB 1200: GOTO 2040 

2180 RETURN 

2190 NIX = NIX + 1 

2200 FLI = 11(1) ♦ V ♦ YRI 

2210 FOR I = 1 TO 8 

2220 MKN1X,I) = IKI): NEXT 

2230 PRINT 

2240 GOSUB 6020 

2250 IF NFX = 1 THEN NFX = 0:NX = NX ♦ 1:FLI(NX) = FU: FU 
= "INTESTAZIONE" ♦ V + YRI: GOSUB 5860 
2260 GOTO 1530: REM INTRODUCE DATI MENU - ' 

2270 IF M2 = 1 THEN U = 5: GOTO 2290 
2280 RETURN 

2290 IF NX = 0 THEN C = 5: POP : GOTO 300: REM NESSUN FI 
LE—NE CREA UNO 

2300 FOR 1 = 1 TO NX: IF 11(1) = LEFTI (FLICI). LEN (FLKI 
)) - 3) THEN PD = I :I = Iti: NEXT si = PD: GOTO 2400 


2310 

2320 

2330 

2340 

2350 


2360 

2370 

2380 

2390 

2400 

2410 

2420 

2430 

2440 

2450 

2460 

2470 

2480 

2490 

2500 

2510 

2520 

2530 

2540 


2550 

2560 

2570 

2580 


2590 


2600 

2610 

2620 

2630 


2640 

2650 


NEXT : IF M2 = 6 THEN 2350 

IF NX = 9 THEN 2620: REM TROPPI FILE 

NIX = 0: REM REIMPOSTA UALORE SE NUOUO NOME FILE 

IF MI = 1 THEN NFX = 1 : RETURN : REM IMPOSTA FLAG NU 

0U0 FILE 

UTAB U: HTAB HX(1): CALL - 868: PRINT B ** NOME NON NE 
L FILE **": CALL 65338: CALL 65338: FOR J = 1 T0 1500: 
NEXT J: UTAB U: HTAB KX(1> 

IF M2 = 7 THEN ER = 1 : RETURN 

IF MI = 5 THEN ER = 1 : RETURN 

IF M2 = 6 THEN ER = 1 : RETURN 

GOSUB 780: POP :II<1) = BB : GOTO 1720 

IF M2 < >1 THEN RETURN 

FU = 11(1) ♦ V ♦ YRI: GOSUB 5930: RETURN : REM LEG 

GE FILE E CONTINUA INPUT 

RETURN 

REM 

REM *************** 

REM * * 

REM * VEDE I FILE * 

REM * * 

REM *************** 

REM 

TEXT : CALL 857:M2 = 2: GOSUB 690: GOSUB 720 
IF NX = 0 THEN CALL 65338: CALL 65338: GOTO 2580 
FOR I = 1 T0 NX STEP 2 
UTAB (22 - NX) / 2 + I / 2 

PRINT TAB( 5)1 LEFTI (FLKI). LEN (ELICI)) - 3) 

; TABC 26);: IF I ( NX THEN PRINT I ♦ 1;"> B ; LEDI ( 
ELICI * 1), LEN (FLKI ♦ D) - 3) 

NEXT I 

IF CS < > 2 THEN RETURN : REM ALTRE ROUTINE 
GOSUB 1060: GOTO 290 

UTAB 8: FOR I = 1 T0 40: PRINT "*";: NEXT : PRINT : PR 
INT "NON E' STATO CREATO ALCUN FILE PAZIENTE.": PRINT 
"USA L'OPZIONE <":: INUERSE : PRINT "INTRODURRE NUOUI 
DATI";: NORMAL : PRINT ">": PRINT 
PRINT "SUL MENU' PRINCIPALE": PRINT : FOR I = 1 TO 40: 
PRINT "*":: NEXT : POKE - 16384,0: UTAB 23: PRINT "P 
REMI UN TASTO QUALUNQUE...";: GET XI: GOTO 290 
REM ** >9 PAZIENTI ** 

REM 

TEXT : HOME : UTAB 3: FLASH : PRINT "ATTENZIONE";: NOR 
MAL : PRINT "--NUMERO MASSIMO FILE PAZIENTI" 

UTAB 10: HTAB 1: PRINT "NON PUOI AUERE PIU' DI 9 PAZIE 
NTI.": PRINT "DEVI USARE UN ALTRO DISCO 0 ELIMINARE": 
PRINT 'UN FILE PAZIENTE ESISTENTE PER CREARE": PRINT " 
UN NUOUO FILE." 

CALL 65338: CALL 65338 

UTAB 23: HTAB 1: PRINT "PREMI UN TASTO PER TORNARE AL 
MENU' ...";: GET XI: POKE - 16368,0 , .. . 

(continua) 
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POCHE LIRE 



Le stampanti MT/85, a 80 colonne, e MT/86, a 136 
colonne, rappresentano una nuova frontiera nel 
settore delle stampanti a basso costo. 

Basso costo, ma non bassa qualità e basse 
prestazioni, infatti ecco le credenziali di questi due 
nuovi prodotti. 

Velocità a 180 cps. bidirezionale ottimizzata, NLQ 
a 45 cps., grafiche, possibilità di 8 fonti alternative 
di caratteri e naturalmente la completa 

compatibilità con il PC IBM. 

Il prezzo: il più competitivo del 
mercato in questa fascia di 
prestazioni. 

Naturalmente anche le MT/85/86 
oltre ai trattori hanno anche 
trascinamento a frizione e 
consentono pertanto il 
trattamento del foglio singolo. 



Tutte, 
le garanzie 
deln.l J 
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LOFF, e salvatelo su dischetto con il 
comando: 

BSAVE SCROLLOFF,A$300,L$CC 

Caratteristiche 

Si è fatto un notevole sforzo per 
creare un programma comprensibile, 
facile da introdurre e da modificare, e, 
quel che più importa, facile da usare. 
Quasi tutte le variabili, le opzioni del 
menù e l’input sono indicizzati in qual¬ 
che maniera per l’efficacia dell’opera¬ 
zione e il risparmio di preziosa memo¬ 


ria. Il principale metodo utilizzato è 
quello dell’indicizzazione mediante la 
posizione del cursore nel menù, che 
sulle prime può confondere un poco. 
Inserite e modificate il codice (in parti¬ 
colare l’area di selezione del menù) 
con estrema cautela, perché è molto 
facile smarrirsi. 

Tutte le scelte del menù, le intesta¬ 
zioni delle pagine e i titoli, come pure 
la maggior parte delle tabulazioni ver¬ 
ticali e orizzontali, sono variabili ma¬ 
trice che vengono lette in memoria 
nella parte iniziale del programma (li¬ 
nee 200-270) dalle istruzioni DATA 


alla fine del programma. Il set del me¬ 
nù è la prima variabile nelle matrici 
bidimensionali del tipo MU$ 
(M1,M2). La seconda variabile, M2, è 
l’elemento in quel set. Il set del menù 
principale è M1=0, e quindi il primo 
elemento della matrice (M2=0) è l’in¬ 
testazione del menù principale, ME¬ 
NU’ PRINCIPALE —APPLIME- 
DIC, come appare nella prima istru¬ 
zione data a linea 6180. Seguono le 
opzioni del menù quali elementi con¬ 
secutivi della matrice. Ogni set di me¬ 
nù corrisponde per quanto possibile a 
un’opzione del menù principale, e 


2660 POP : GOTO 290: REM RITORNA AL MENU' PRINCIPALE 
2670 REM 

2680 REM a***************** 

2690 REM * * 

2700 REM » R1CERCA/0RDINA * 

2710 REM * * 

2720 REM «a**»#*****#*#**** 

2730 REM 

2740 CALL 857:S = 4:M1 = 0:M2 = 3:HLX = 4:MX = lsKT = 5 

2750 G0SUB 690: G0SUB 720:M1 = 3 

2760 IF NX = 0 THEN 2510: REM NESSUN FILE 

2770 GOTO 370 

2780 REM 

2790 REM a******#*####**** 

2800 REM * * 

2810 REM * REC. INDIM. * 

2820 REM * * 

2830 REM a**####******#**# 

2840 REM 

2850 CALL 768:RX = Q:MD = 0:SUM = 0 

2860 S = NXsHLX = <20 - 2 * NX) / 2 - 1 :HT = 15 

2870 M2 = CS: G0SUB 690: GOSUB 720 

2880 MI = 2 

2890 GOSUB 2900: GOTO 2940 

2900 F0R 3 = 1 T0 NX:MU$(M1,I> = LEFT$ (FL$(I), LEN (FL$(I 
)) - 3): NEXT 
2910 GOTO 370 

2920 FL* = FL$<CS): POKE 34,23: GOSUB 5930: P0KE 34.0: IF N 
17. = 0 THEN 1230: REM LEGGE FILE—CONTROLLA NIX 
2930 RETURN 

2940 IF RXX = 1 THEN RXX = 0: RETURN 
2950 RESTORE : GOSUB 200:M1 = 1 

2960 TEXT : CALL 768: HTAB 1: MTAB 24: INVERSE : FOR M2 = 1 
T0 8: PRINT MU$(M1.M2>: PRINT : NEXT : PRINT ; PRINT 
: PRINT : PRINT : PRINT 
2970 NORMA' :J = 1 

2980 FOR 1 * 1 T0 8: VTAB 2 * 1 ♦ 1: HTAB HXU): PRINT M$(J 
,1);: NEXT 

2990 MI = 3:M2 = 1: GOSUB 690 

3000 MTAB 20: HTAB 1: PRINT •INIETTI N. RECORD DA VEDERE (1 
-■:N1X;'),0* 

3010 MTAB 21: HTAB 1: INVERSE : PRINT 'RTN' ; : NORMAL : PRIN 
T ^SCORRE S= STAMPA F=FINE E=EDITA B 
3020 CK = 1 : GOSUB 3170 

3030 MTAB 23: HTAB 1:X$ = STR* (RX): GOSUB 940:RX* = X*: P 
RINT 'CP=':RX$: MTAB 24: PRINT ’0N= B ;:X* = STR$ <MD): 
GOSUB 940 :MD* = X*: PRINT MD*;' T0TALE='::X* = STR* 
(SUM): GOSUB 940:SUM$ = X$: PRINT SUM*:: CALL - 868 
3040 MTAB 22: HTAB 1: PRINT 'RECORD N. ';: 1WERSE : PRINT 
'Js: NORMAL : PRINT ' DI ":N1X: TAB< 30) : : PRINT 'INPUT 
=';: GOSUB 1040: MTAB 22: INPUT '"jX* 

3050 IF NIX = 0 THEN 290: REM NESSUN RECORD—TORNA AL MEN 
U' 

3060 GOSUB 1050: REM APRE FINESTRA 
3070 IF X* = 'F' THEN 2740 
3080 IF X* = " THEN J = J ♦ 1: GOTO 3140 
3090 IF X* = 'S' THEN GOSUB 6500: HTAB 38 
3100 IF X* = 'E' THEN 4040 

3110 IF MAL <X$) < = 0 OR MAL (X$) ) N17. THEN MTAB 23: 

HTAB 1: CALL - 868: HTAB 1: GOTO 3040 
3120 X7. = MAL <X$> 

^130 j = x/ t 

3140 FOR I = 1 TO 8: MTAB 2*1+1: HTAB HX<I): CALL - 86 
8: MTAB 2*1* 2: HTAB 1 : CALL - 863: NEXT 


3150 IF J < = NIX THEN FOR I = 1 T0 8: MTAB 2 * I + li HT 
AB HX(I): PRINT M$(J.I);: NEXT 
3160 IF EDX = 1 THEN RETURN 
3170 RX = 0:MD = 0:SUM = 0: FOR I = 1 TO J 

3180 RX = RX ♦ MAL <M$(1,8)):MD = MD + MAL <M*<1,5)):SUM 

= RX ♦ MD: NEXT : IF CK = 1 THEN CK = 0: RETURN 

3190 IF J < = NIX THEN 3030 


3200 

IF J > NIX THEN J = 1: GOTO 3150 

3210 

REM 


3220 

REM 

a****##*****##***##** 

3230 

REM 

* * 

3240 

REM 

«ESPLORA CAMPO DATI * 

3250 

REM 

* * 

3260 

REM 


3270 

REM 



3280 TEXT : CALL 857:S = 8:M1 = 3:HLX = 1:C = 1:MX = 1:M2 = 
2: GOSUB 690: GOSUB 720sMl = 1 

3290 MI = 6:HT = 10:J1 = 0: REM J1=C0NTAT0RE CQRRISPONDEN 
ZE ESPLORAZIONI 

3300 J = 0: REM CONTATORE RECORD 

3310 FOR I = 1 T0 8:MU$(M1,I) = MU$(1,I): NEXT 

3320 GOTO 370 

3330 C1X = CS: REM SCELTA DEL FILE 
3340 CALL 820sMl = 0:M2 = 3: GOSUB 690: GOSUB 720 
3350 FOR I = 1 TO 40: PRINT NEXT 
3360 MTAB 23: INVERSE : PRINT '<RTN>';: NORMAL : PRINT 'PER 
MENU' ESPLORAZIONE/OROINAMENTO' 

3370 MTAB 6: HTAB 1: PRINT 'CAMPO DA ESPLORARE="; : IMMERSE 
: PRINT MU*<1,C1X): NORMAL 

3380 MTAB 10: HTAB 1 : CALL - 868: INPUT 'INTRODUCI STRINGA 
/MALORE => ':X* 

3390 IF X$ = " THET4 2740 

3400 IF (C1X = 5 OR C1X = 7 OR C1X = 8) AND MAL (X$) < = 

0 THEN CALL 65338: GOTO 3380 
3410 REM 

3420 REM SCELTA INDIMID. 0 FAMIL. *** 

3430 REM 

3440 CALL 857.-M1 = 3:M2 = 2: GOSUB 690: GOSUB 720 
3450 FOR I = 1 TO 2:MU$(8 J I) = MU$(9,I): NEXT 
3460 MI = 8:S = 2:MX = 4:HT = 10: GOTO 370 
3470 C2X = CS: RESTORE : GOSUB 200 
3480 IF C2X = 1 THEN CALL 857:M1 = 3:M2 = 2: GOSUB 690: GO 
SUB 720:M1 = 4:S = NX:HT = 15:MX = 1: GOTO 2900: REM 
PRELEMA NOME PERSONA PER CORRISPONDENZA 
3490 C3X = CS: REM C3XESIM0 DEL NX NOME DEL FILE 
3500 IF C2X = 1 THEN E = C3X:B = C3X: REM 1 FILE 
3510 IF C2X = 2 THEN E = NX:B = 1 : REM TUTTI I FILE 
3520 MI = 1 

3530 CALL 857: VTAB 24: HTAB 1: IWERSE : FOR M2 = 1 T0 8: 
PRINT MU$(M1,M2): PRINT : NEXT : PRINT : PRINT : PRINT 
: NORMAL :J = 0 

3540 MI = 0:M2 = 3: GOSUB 690: GOSUB 720:M1 = 1 
3550 MTAB 2 * C1X 4 3: HTAB 1: FLASH : PRINT MU*(1,C1X): NO 
RMAL 

3560 MTAB 3: HTAB 3: PRINT 'STRINGA ESPLORAZ10NE=' ; : IWERS 
E : PRINT X*: NORMAL 
3570 FOR X = B TO E: REM NOMI FILE 
3580 HTAB 1 

3590 FU = FL$(X): POKE 35.0: GOSUB 5930: POKE 35,24: IF NI 
X = 0 THEN NEXT X: GOTO 3630: REM LEGGE FILE 
3600 J = 0: FOR Y = 1 TO NIX 

3610 IF LEFT$ <X$, LEN (X$>> = LEFT$ (M$(Y,C1X), LEN (X$) 

} THEN J = J + 1:J1 = J1 ♦ 1 : GOSUB 3650 
3620 NEXT Y,X (continua) 
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IN DIRETTA 
DAL VOSTRO 
COMPUTER. 






Sistema Polaroid Palette per dia im¬ 
mediate 35mm. e copie fotografiche 
a colori su carta (hard-copy). 

Il sistema Polaroid Palette è stato con¬ 
cepito come unità periferica per i più diffu¬ 
si personal computers. 

Istogrammi, grafici, ed altri tipi di ela¬ 
borati possono essere facilmente riprodot¬ 
ti nelle tonalità più sature e brillanti, gra¬ 
zie ad una scala cromatica di ben 72 colori. 

Il tutto in tempo reale, operando sia 
con schermo monocromo che a colori. 

Il sistema Polaroid Palette utilizza, in¬ 
fatti, il segnale di uscita del computer stes¬ 


so e consente elaborazioni fotografiche a 
colori sia su positivo (hard copy) che in 
diapositiva Polaroid 35 mm. 

Il sistema minimizza quindi la retinatu- 
ra dello schermo, per una riproduzione fo¬ 
tografica accurata e definita. 

Il sistema Polaroid Palette è uno stru¬ 
mento di lavoro per operatori di marke¬ 
ting, per ricercatori, per tutti coloro che 
necessitano di un adeguato supporto visi¬ 
vo alle loro presentazioni. 

Chiedete una dimostrazione al vo¬ 
stro rivenditore di fiducia e ai Distri¬ 
butori Specializzati Polaroid (indiriz¬ 
zi sulle Pagine Gialle). 


Per ulteriori informazioni spedite questo 
tagliando a: POLAROID (Italia) S.p.A. 
Divisione Prodotti Professionali 
Via Piave, 11 - Tel. 0332/470031 
21051 ARCISATE (Varese) 



Mittente _ 
Indirizzo _ 


ITn 

_» 

ài 


mm Polaroid 


“Polaroid” è un marchio registrato della Polaroid Corporation, Cambridge, Mass., USA. Polaroid 1985. 
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qualcuno ha impieghi multipli. Le ma¬ 
trici H%()eL%() sono le tabulazio¬ 
ni orizzontali e le lunghezze di stringa 
delle linee di input per l’introduzione e 
l’editing dei dati. 

Le opzioni del menù (matrici del 
tipo MU$ (M1,M2)) vengono eseguite 
tramite comandi ON-GOTO che 
hanno come chiavi il set di menù MI e 


l’elemento di quel set, M2, dove 
M2=CS nella routine di menù. Tutte 
le routine di menù tornano al menù 
principale con variabili impostate sui 
valori originali del menù principale. 
Queste funzioni vengono eseguite nel¬ 
le linee 500-590, dove la variabile CS 
ha lo stesso valore di M2, l’opzione del 
menù. 


È questo l’autentico "cervello" del 
programma, nel senso che ogni scelta 
fatta sul menù con la selezione a curso¬ 
re inverso ha luogo nelle linee 
290-590. In effetti le sole volte che si 
devono immettere dati da tastiera so¬ 
no quelle che si presentano durante 
l’introduzione dei dati, l’editing dei 
dati, l’eliminazione dei file e l’esplora- 


3630 IF J1 = 0 THEN CALL 768: VTAB 10: HTAB 8: PRINT 'NON 
TROVATE CORRISPONDENZE': FOR I = 1 TO 1500: NEXT : G0T 
0 2740 

3640 HLX = 5: GOTO 2740 
3650 VTAB 23: CALL - 868 

3660 VTAB 24: HTAB 1: PRINT 'TOTALE CORRISP0NDENZE= ';: HT 

AB 23: INVERSE : PRINT Jljs NQRMAL 
3670 FOR I = 1 T0 8: VTAB 2*1* 3: HTAB HX(I): CALL - 86 
8: PRINT MKY,I) : NEXT 

3680 VTAB 22: HTAB 1: PRINT B/ S' s STAMPA TIFINE (':; 

INVERSE : PRINT 'RTN';: N0RMAL : PRINT ■> =C0NTINUA‘ 
3690 VTAB 23: HTAB 25: PRINT 'INPUT GET Yl: P0KE * 163 
68,0: 

3700 IF Yl = CHRI (13) THEN RETURN 
3710 IF Yl = 'F' THEN POP : GOTO 2740 

3720 IF Yl = 'S' THEN VTAB 22: HTAB 1 : CALL - 958: G0SUB 

6500: GOTO 3680 
3730 GOTO 3690 
3740 GET X*: GOTO 290 
3750 REM 

3760 REM ***************** 

3770 REM * * 

3780 REM * LISTA RICETTE * 

3790 REM * * 

3800 REM #*#*«***#**** 0 * 

3810 REM 

3820 RXX = 1 : GOSUB 2850: REM FLAG PER QUESTA ROUTINE 

3830 RESTORE : GOSUB 200 :M1 = 1 

3840 VTAB 3: HTAB 12: PRINT 'IL PAZIENTE E' ';: 1WERSE : P 
RINT LEFTI (FLKCS), LEN (FLKCS)) - 3): N0RMAL 
3850 VTAB 4: HTAB 1: PRINT 'PRESCRIZIONE'; TAB< 19>'DR/CLIN 
ICA': TAB( 34)' DATA ' 

3860 FOR I = 1 T0 40: PRINT NEXT 
3870 P0KE 34,5: HOME 

3880 IF NIX = 0 THEN PRINT 'NESSUN RECORD NEL FILE': FOR I 
= 1 T0 2000: NEXT : GOTO 290 
3890 FOR 1 = 1 T0 INT (NIX / 15) ♦ 1 

3900 IF NIX < =15 THEN FOR J = 1 TO NIX: GOTO 3920 

3910 FOR J = (I - 1) * 15 + 1 TO (I - 1) *15 ♦ 15 

3920 PRINT LEFTI (MKJ.6).18); TAB( 19) LEFTI <MKJ,3),12) 

: TAB( 35) LEFTI (MKJ,2),5) 

3930 NEXT J 

3940 GOSUB 1060: REM STMPA 0 C0NT. 

3950 NEXT I 
3960 GOTO 2740 
3970 REM 

3980 REM ***************** 

3990 REM * * 

4000 REM * MODO EDIT * 

4010 REM * * 

4020 REM ***************** 

4030 REM 

4040 HTAB 1: VTAB 20: CALL - 958: REM PULISCE BASE SCHE 
RMO 

4050 JX = J: REM VALORE TEMPO 
4060 EDX = 1: REM IMPOSTA FLAG EDITING 
4070 XI = " 

4080 VTAB 23: HTAB 1: PRINT 'EDITA ';: INVERSE : PRINT 'RTN 
':: N0RMAL : PRINT ACCETTA '/'«RIEDITA PAGINA 0 
4090 GOSUB 3140: REM MOSTRA DATI 
4100 FOR K = 2 TO 8 
4110 VTAB 2 * K + 1: HTAB HX(K) 

4120 IF K = 2 THEN GOSUB 1870:IKK) = IKM2): GOTO 4140: R 

EM INPUT DATA E CONTROLLO ERRORI 
4130 INPUT " ;I$(K) 

4140 IF IKK) = CHRI (13) THEN VTAB 2 * K + 1 : HTAB HX(K) 
: PRINT MKJX.K) :IKK) = MKJX.K) 

4150 IF IKK) = V* THEN FOR I = 2 TO 8: VTAB 2 # I * 2: H 

TAB 1: CALL - 868: VTAB 2*1 + 1 : HTAB HX(I): CALL 

- 868: HTAB HX(I): PRINT MKJX.l);: NEXT :K = 2: VTAB 
2 * K + 1: HTAB HX(K): GOTO 4110 


4160 XI = IKK): 0N K GOSUB 4160,4270,4320,4329,4390,4320,4 
360,4390 
4170 NEXT 

4180 FOR X = 2 TO 8: IF MKJX,X) < > IKX) THEN X = 8: NEX 
T : GOTO 4200 
4190 NEXT : GOTO 4230 
4200 FOR X = 2 TO 8 
4210 MKJX.X) = IKX): NEXT 
4220 GOSUB 6020: REM SCRIVE FILE 
4230 J = JX:EDX = 0:M1 = 1: GOTO 2960: REM PULISCE FLAG 
EDITIG—IMPOSTA STRINGHE MENU 7 
4240 REM 

4250 REM ** CONTROLLA LA DATA ** 

4260 REM 

4270 X* = IKK) :XI = LEFTI (XI.2) 4 MIDI (XI,4.2) 

4280 GOSUB 810: IF ER = 1 THEN ER = 0:XI = " : POP : GOTO 4 
110 

4290 IF VAL ( LEFTI (Xl,2)> ) 31 OR VAL ( RIGHTI (XI,2» 

) 12 THEN POP : GOTO 4110 
4300 RETURN 

4310 GOSUB 4440: RETURN 
4320 IF XI = " THEN GOSUB 4440: RETURN 
4330 M2 = K: GOSUB 1120: GOSUB 730: GOSUB 790: TEXT : REM 
CONTROLLO ALFABETICO 

4340 IF ER = 1 THEN ER = 0: POP : GOTO 4110 
4350 RETURN 

4360 IF XI = " THEN GOSUB 4440: RETURN 
4370 FOR I = 0 T0 12: IF XI = STRI (I) THEN I = 12: NEXT : 
RETURN 

4380 NEXT : POP : GOTO 4110 
4390 IF XI = " THEN GOSUB 4440: RETURN 
4400 M2 = K: GOSUB 1120: GOSUB 940: TEXT : IF ER = 1 THEN E 
R = 0: GOTO 4430: REM CONTROLLO NUMERO 
4410 GOSUB 1120: GOSUB 850: TEXT : IF ER = 1 THEN ER = 0: G 
0T0 4430 

4420 IKK) = XI: VTAB 2 * K ♦ 1 : HTAB HX(K): PRINT IKK): R 
ETURN 

4430 POP : GOTO 4110: REM SOLO SE C'E' UN ERRORE 
4440 VTAB 2 * K ♦ 1: HTAB HX(K): PRINT MKJX,K):IKK) = MK 
JX,K): RETURN 
4450 REM 

4460 REM ***************** 

4470 REM * * 

4480 REM * TOTALI » 

4490 REM » SPESE * 

4500 REM * * 

4510 REM *##*##*#*#»*##»*# 

4520 REM 

4530 TEXT : CALL 857:M1 = 0:S = 4:M2 = 4:VX = 1:M = 0:N = 0 
:HT = 10 : HLX = 2 

4540 J1 = 0: REM CONTATORE RECORD 

4550 GOSUB 690: GOSUB 720:M2 = 0 :CS = 1 ::M1 = 5 

4560 IF NX = 0 THEN 2510 

4570 GOTO 370 

4580 CALL 768:C1X = CS:S = 2:VX = 6:M1 = 0:M2 = 4: GOSUB 69 
0: GOSUB 720 
4590 MI = 9:M2 = 0 

4600 GOTO 370 

4610 CALL 768:C2X = CS:M1 = 0:M2 = 4: GOSUB 690: GOSUB 720 
4620 S = NX:HLX = (20 - 2 * NX) / 2 - 1:HT = 15:M2 = 4:VX = 
1 :M1 = 0:; 60SUB 690: GOSUB 720:M1 = 2: GOSUB 2900 
4630 RESTORE : GOSUB 200 :M1 = 1 
4640 C3X = CS: REM NOME PAZIENTE PER NUMERO FILE 
4650 IF ER = 1 THEN ER = 0: HTAB 1: GOTO 4620 
4660 GOTO 4680 

4670 C2X = CS: REM TUTTI I FILE CS=2 

4680 IF C2X = 1 THEN E = C3X:B = C3X: REM 1 FILE 

4690 IF C2X = 2 THEN E = NX:B = 1 : REM TUTTI I FILE 

4700 RI = 5 :R2 = 8 

4710 PRINT 

4720 CALL 857:M1 = 0:M2 = 4: GOSUB 690: VTAB 2: HTAB 1 
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zione delle stringhe. 

Si sono dovute fare diverse scelte in 
merito alla struttura dei file di dati 
utilizzati e generati da APPLIME- 
DIC. Si doveva ricorrere a un unico 
gigantesco file? Oppure era meglio 
farne diversi di piccole dimensioni? 
Dovevano essere ad accesso casuale o 
sequenziali? Come separarli per an¬ 


no? Si è deciso alla fine di creare molti 
piccoli file, di natura sequenziale, con 
file di intestazione per ogni anno. 
Questa scelta è stata fatta a causa della 
caratteristica di manipolazione di dati 
del programma, che è gestita più facil¬ 
mente e con maggiore rapidità da file 
sequenziali. 

Per questa ragione a ogni nome di 


file (nome di paziente) è aggiunto l’an¬ 
no (per esempio .85) ai fini di un’esat¬ 
ta lettura della data per lo specifico 
anno, e il file d’intestazione contiene il 
nome di ogni file valido per quell’an¬ 
no. Questo fatto genera una gran 
quantità di file, ma la maggior parte di 
essi non è estesa e può esser letta rapi¬ 
damente. Vi conviene usare un unico 


4730 PRINT •PAZIENTE....DATA . ONORARI .. .COSTI “ 

4740 PR1NT ‘NOME 1 : REM 

34 SPAZI 

4750 FOR I = 1 TO 40: PR1NT CHR* (95);: NEXT : PRINT CHR* 
(13): VTAB 6: POKE 34,5: FOR X = B TO E 
4760 REM 

4770 IF C2X = 1 THEN 4810: REM NON RILEGGE IL FILE 
4780 FL$ = FL$(X): POKE 34,23: 

4790 GOSUB 5930: POKE 34.5: REM LEGGE FILE 
4800 1F NIX = 0 THEN 4900 

4810 PRINT LEFT* ( LEFTI <FL*(X), LEN (FL*(X>) - 3), 10); 
4820 FOR Y = 1 TO NIX 

4830 M = VAL (M$(Y,RD) ♦ M:N = VAL (M*(Y,R2)) ♦ N 
4840 IF C1X = 1 THEN PRINT TAB( 12): LEFT$ (M$(Y,2),5); T 

AB( 41 - LEN (M*(Y.R2))):M*(Y.R2) 

4850 IF C1X = 2 THEN PRINT TAB( 12) : LEFT* (M$(Y,2),5); T 
AB< 31 - LEN <M*<Y.R1)));M*(Y.R|) 

4860 IF C1X = 3 THEN PRINT TAB( l2>: LEFT* <M$(Y,2),5); T 

AB( 31 - LEN (M$(Y,R1 ))) ;M$(Y,Rl) TAB( 41 - LEN (M$( 
Y,R2)));M$(Y,R2) 

4870 J1 = J1 4 1: REM CONTA PER 15 LINEE 

4880 IF J1 = 15 THEN J1 = 0: ON CI*/. GOSUB 4930,4960,4990 

4890 NEXT Y 

4900 NEXT X 

4910 ON C1X GOSUB 4930,4960,4990 
4920 GOTO 4530 

4930 HTAB 32: PRINT -. ' 

4940 X$ = STR* (N): GOSUB 940: PRINT TAB( 41 - LEN (X$)) 

4950 é0SUB 5020; RETURN 
4960 KTAB 22: PRINT " . 

4970 X$ = STR* (M): GOSUB 940: PRINT TAB( 31 - LEN (XI)) 
4980 (SOSUB 5020: RETURN 

4990 KTAB 22: PRINT *-TAB( 32)' —. ' 

5000 X$ = STR$ (M): GOSUB 940: PRINT TAB< 31 - LEN <X$)) 
;X$;:X* = STRI (N): GOSUB 940: PRINT TAB( 41 - LEN 
(X$));X$ 

5010 GOSUB5020: RETURN 

5020 GOSUB 1060: HTAB 1: VTAB 6: CALL * 958: VTAB 5: PRINT 
CHR^ (13);: RETURN 
5030 GOTO 4530 
5040 REM 

5050 REM ******************* 

5060 REM * * 

5070 REM * CREA NUOVO FILE * 

5080 REM * * 

5090 REM ******************* 

5100 REM 

5110 IF NX = >9 THEN GOSUB 2620: REM TROPPI FILE 
5120 TEXT : CALL 857:M2 = CS: GOSUB 690; GOSUB 720 
5130 VTAB 23: PRINT 'INTRODUCI NOME PERSONA ';: INVERSE : P 
RINT *< RTT4) " ; : NORMAL : PRINT 8 PER FINIRE* 

5140 VTAB 24: PRINT 'INTRODUCI ';: IWERSE : PRINT 'FILES'; 
: NORMAL : PRINT * PER NOMI FILE CORRENTI*; 

RISA PIWF on • prive oj o 

5160 VTAB IO! HTAB 1sER = 0: PRINT 'INTRODUCI NOME DEL NU0V 
0 FILE': PRINT : HTAB 1 : PRINT CALL * 868: INP 

UT ":FL* 

5170 IF LÉFT* (FL$,5) = 'FILES' THEN GOSUB 5330: GOTO 516 
0 

5180 IF FL* = " THEN 5310 
5190 FOR I = 1 TO LEN (FL$) 

5195 IF ( ASC ( MID$ (FLI.1,1)) < 65 AND ASC ( MID* (FD.I 
.1)) < > 46) OR ASC ( MIDS (FD.I.D) ) 90 THEN HtA 
È 1: VTAB 20: CALL - 868: PRINT *S0L0 MIUSCQLE'j: 60 
SUB 1030:ER = 1 : HTAB 1 : CALL - 868:1 = LEN (FLf) : N 
EXT : GOTO 5160 
5200 NEXT 1 

5210 X$ = FL*:M2 = 1: GOSUB 760: IF ER = 1 THEN 5160 
5220 FL$ = FL* ♦ '.' + YR$ 


5230 IF NX. < 1 THET4 5270 
5240 FOR I = 1 TO NX 

5250 IF FLKI) = FL* THEN CALL 65338: GOSUB 700: VTAB 10: 
HTAB 6: PRINT 'NOME FILE DUPLICATO-RE INTRODUCI" : GOSU 
B 1030: GOSUB 710:1 = NX: NEXT : GOTO 5160 
5260 NEXT I 
5270 NX = NX * 1 
5280 FLKNX) = FL$ 

5290 NIX = 0: GOSUB 6020: IF NX = 9 THEN 5310: REM SE 9 FI 
LE. SALVA INTESTAZIONE 
5300 GOSUB 700: GOTO 5110 
5310 FL* = 'INTESTAZIONE* + '.' + YR$: GOSUB 5860 
5320 GOTO 290 

5330 IF NX = 0 THEN RETURN 

5340 POKE 35,22: VTAB 14: HTAB 1 

5350 FOR J = 1 TO NX STEP 3 

5360 PRINT LEFT* (FL*(J), LEN (FL$(J)) - 3); 

5370 IF J + 1 < = NX THEN PRINT TAB( 14) LEFT* <FL$(J + 

1) , LEN <FL*(J 4 D) - 3): 

5380 IF J + 2 < = NX THEN PRINT TAB( 26) LEFT$ (FL$(J 4 

2) , LEN (FLKJ 4 2)) - 3) 

5390 NEXT : POKE 35,13: RETURN 
5400 REM 

5410 REM **************** 

5420 REM * * 

5430 REM * ELIMINA FILE * 

5440 REM * * 

5450 REM **************** 

5460 REM 

5470 TEXT : CALL 857:M2 = 6: GOSUB 690: GOSUB 720 
5480 IF NX = 0 THEN 2510: REM NESSUN FILE 
5490 GOSUB 2520 
5500 VX = PEEK (37) 

5510 HTAB 1: VTAB 23: PRINT 'INTRODUCI NOME FILE DA ELIMINA 
RE': PRINT : PRINT '<':: INVERSE : PRINT 'RTN" ; : NORMA 
L : PRINT ') PER FINIRE';: 'VTAB VX 4 3 
5520 HTAB 1: PRINT ' NOME FILE =) ';: CALL - 868: INPUT 
";I$ 

5530 IF 1$ = " THEN MI = 0:M2 = 0: GOTO 290 
5540 V = VX 4 3:I*<1) = 1$: GOSUB 2290 
5550 IF ER = 1 THEN ER = 0: GOTO 5520 
5560 CALL 857: GOSUB 690: GOSUB 720 
5570 VTAB 10: HTAB 1: PRINT 'VUOI VERAMENTE ELIMINARE IL FI 
LE ': PRINT : HTAB 19 - LEN (1$) / 2: INVERSE : PRINT 
1$;: NORMAL : PRINT ' ?': PRINT : HTAB 16: PRINT '(S/ 
N)" 

5580 'VTAB 16: HTAB 17: GET X*: POKE - 16368,0: IF X$ = 'S' 
THEN 5600 
5590 GOTO 5470 

5600 FL* = 1$ 4 ♦ YR$: PRINT 

5610 GOSUB 6100: REM ELIMINA IL FILE 
5620 IF I = NX THEN 5660 
5630 FOR J = I TO NX 
5640 FL*(J) = FL*(J 4 1) 

5650 NEXT J 
5660 NX = NX - 1 

5670 FL$ = 'INTESTAZIONE' 4 V * YR*: GOSUB 5860 
5680 MI = 0:M2 = 0: GOTO 290 

5690 TEXT : GOSUB 710: VTAB 10: HTAB 18: PRINT 'FINE': END 


5700 

REM 




5710 

REM 

**************** 

5720 

REM 

* 


* 

5730 

REM 

* 

ROUTINE 

* 

5740 

REM 

* 

DISCO 

* 

5750 

REM 

* 


* 

5760 

REM 

**************** 

5770 

REM 





5780 QNERR GOTO 6310 

5790 PRINT Wj'BLOAD SCROLLOFF': QNERR GOTO 6260 
5800 PRINT D$;*0PEN ';FL* 

5810 PRINT DI;'READ ';FD: INPUT NX ( 
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DORLAND ITALIANA 



L’arte di decidere richiede strumenti 

di sintesi veloci e affidabili, capaci di sintetizzare 

i singoli punti in un unico quadro. 



Più difficili sono le decisioni che devi prendere, 
più importante è che tutti gli elementi siano organiz¬ 
zati in maniera sintetica e comprensibile. 

11 tuo personal, anche se è certamente in grado 
di fornirti tutti i dati di cui hai bisogno, non è sempre 
capace di esporteli nella forma in cui ti servono. 



Strumenti decisionali insostituibili 

Per questo la Hewlett-Packard, all’avanguardia 
nell’elettronica mondiale, ti propone i suoi plotter, che 
organizzano fatti e cifre 
complesse in grafici co¬ 
lorati, facili da compren¬ 
dere. Con i plotter HP 
tendenze di mercato, 
analisi di prodotto, pre¬ 
visioni finanziarie 
prendono corpo in diagrammi precisi, curve colorate, 
istogrammi, grafici circolari, accelerando i tuoi pro¬ 
cessi decisionali e rendendo le tue presentazioni, 
meeting, rapporti, più incisivi ed efficaci. Troverai i 
plotter HP in tre versioni: a 8 e 6 penne, nel formato 
UNI A3 ed A4, ed a 2 penne, nel formato UNI A4. 


Compatibili con tutti i personal 

E potrai usarli col tuo personal, anche se non hai 
un HP, infatti i nostri plotter sono compatibili con 








tutti i principali personal sul mercato. 

Se vuoi saperne di più ti basterà compilare in 

ogni sua parte 
l’accluso coupon: 
riceverai, senza 
impegno, una 
documentazione 
dettagliata sui 
plotter HP e il loro 
impiego. 

Hewlett-Packard Italiana S.p.A. 

Via G. Di Vittorio 9 - 20063 Cernusco Sul Naviglio 
Milano - Tel. 02/923691 



Se vuoi saperne di più sui plotter HP 

I invia questo tagliando a Hewlett-Packard Italiana S.p.A. 

Marketing Communication C.P. 10190,20100 Milano. 

| Nome e Cognome _ 

| Società ____ 

Indirizzo __ 

HP-soluzioni produttive 

L n HEWLETT 

r PACKARD 
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5820 1F NX < 1 THB4 5840 

5830 FOR I = 1 TO NX: INPUT Ftf(l): NEKT 

5840 PRINT D$;"CL0SE ";FL$ 

5850 RETURN 

5860 PRINT DI /OPEN ":FL$ 

5870 PRINT W ; “URITE *;FU 
5880 PRINT NX 
5890 FOR I = 1 TO NX 
5900 PRINT FL$(I): NEXT 
5910 PRINT W/CLOSE ';FL* 

5920 RETURN 

5930 PRINT W/OPEN ":FL$ 

5940 HTAB 1 : CALL - 868 
5950 PRINT D*;'READ ";FL$ 

5960 INPUT NIX 

5970 IF NIX = 0 THEN 6010 

5980 FOR I = 1 TO NIX 

5990 FOR J = 1 TO 8 

6000 INPUT M*(I.J): NEXT : NEXT 

6010 PRINT 0$; * CLOSE* : RETURN 

6020 PRINT W/OPEN ';FL$ 

6030 PRINT D$;“URITE ;FL$ 

6040 PRINT NIX 

6050 FOR I = 1 TO NIX 

6060 FOR J = 1 TO 8 

6070 PRINT MMI.J): NEXT : NEXT 

6080 PRINT D$;"CLOSE B |FU 

6090 RETURN 

6100 PRINT D$/OPEN ':FL$ 

6110 PRINT W/CLOSE :FL$ 

6120 PRINT Wj'DELETE ; ;FL$ 

6130 RETURT4 
6140 CALL 913 

6150 M2 = CS: INVERSE : GOSUB 690: GOSUB 720: POKE 34,4: RE 
STORE : GOSUB 130 
6160 TEXT : CALL 768: GOTO 290 
6170 REM MENU' PRINCIPALE MU$(0,M2) 

6180 DATA 1 MENU' PRINC1PALE-APPLIMED1C '/INTRODURRE 
DATI" /VEDERE ATTUALI NOMI PAZIENTI"/CERCARE/ORDIWR 
E/EDITARE RECORD"/TOTALI SPESE "/ CREARE NUOVO FILE PA 
ZIENTE" /ELIMINARE FILE PAZIENTE 11 /CAMBIARE ANNI"/USC 
IRE DAL PRQGRAWA" 

6190 DATA "NOME PAZIENTE-"/DATA DELLA CURA (OG/MO-V 
"DR./CL1NICA-" /DIAGNOSI-"/ONORARIO-","PRESCRIZIONE-' 
/QUANTITÀ'-" .‘COSTO PRESCRIZIONE-" 

6200 DATA "ESAMINAÓE/ED1TARE RECORD INDIVIDUALI"/ESPLORARE 
CAMPO DATI"/LISTARE PRESCRIZIONI PAZIENTE‘/TORNARE 
AL MENU' PRINCIPALE" 

6210 DATA "COSTI PRESCRIZIONI"/ONORARI"/TOTALI PER EN 
TRAMBI"."TORNARE AL MENU-' PRINCIPALE" 

6220 DATA *PER UN SINGOLO PAZIENTE"/PER OGNI PAZIENTE" 
6230 DATA 17,28,13,11,12,14,13,22 


6240 DATA 11,5.25,27.7,24,1.6 

6250 DATA "MENU PRINCIPALE—RECORD MEDICI"/ AGGIUNGERE U 
N RECORD "/ EDITARE UN RECORD" 

6260 CALL - 3288: IF PEEK (222) = 5 MD LEFT* (FL*,12) = 
"INTESTAZIONE" THEN 6280 
6270 GOTO 6310 

6280 PRINT W/URITE";FL$: PRINT 0: REM NX 
6290 PRINT D*;"CLOSE":FL* 

6300 GOTO 160: REM RILEGGE IL FILE 
6310 CALL - 3288: TEXT : HOME : CALL 65338: CALL 65338: VT 
AB 8: FOR 1 = 1 TO 40: PRINT "«";: NEXT : PRINT 
6320 ER$ = *" 

6330 IF PEEK (222) = 9 THEN ERI = " DISK FULL ERROR ": GOT 
0 6410 

6340 IF PEEK (222) = 8 THEN ER* = " INPUT/OUTPUT ERROR-CHE 
CK DRIVE DOOR ": GOTO 6410 

6350 IF PEEK (222) = 6 THEN ER* = " FILE BINARIO NON SUL D 
ISCHETTO ": GOTO 6420 

6360 IF PEEK (222) = 4 THEN ER* = " DISK URITE-PROTECTED " 

: GOTO 6410 

6370 IF PEEK (222) = 11 THEN ER* = " SYNTAX ERROR ": GOTO 
6390 

6380 m = " CONSULTA tWNUALE CODICE ERRORI ": GOTO 6410 
6390 HTAB (40 - LEN (ER$)) / 2: PRU4T ER*: PRINT : PRINT " 
A LINEA PEEK (218) ♦ PEEK (219) * 256 
6400 GOTO 6450 

6410 HTAB (40 - LEN <EW)) / 2: PRINT ERI: PRINT "ERRORE N 
. ": PEEK (222)/ A LINEA "; PEEK (218) + PEEK (219) 

« 256: GOTO 6430 

6420 HTAB (40 - LEN (ERI)) / 2: PRINT ER*: PRINT : VTAB 22 
: PRINT "ERRORE FATALE--NON POSSO CONTINUARE": END 
6430 PRINT "PREGO CORREGGI LA SITUAZIONE DESCRITTA": GOTO 6 
450 

6440 PRINT "ERRORE N. ": PEEK (222);" IN LINE PEEK (218) 
+ PEEK (219) * 256 

6450 PRINT : FOR I = 1 TO 40: PRINT "«":: NEXT 
6460 PRINT : PRINT "PREMI UN TASTO PER CONTINUARE";: GET X$ 
: POKE - 16368,0: TEXT : HOME 
6470 IF MI = 0 THEN TEXT : HOME : GOTO 290 

6430 CS = PEEK (972): GOTO 510: REM TORNA ALL'ULTIMA OP 

ZI ONE FATTA SUL MENU' 

6490 REM DIMP SCHERMO 
6500 GOTO 6520 

6510 FOR F = P TO P ♦ 39:A = PEEK <F):A = A MA < 32) « 1 
92:A = A ♦ (A < 64) * 128:A = A MA < 96) * 64:A = A 

♦ (A < 128) » 64:A = A MA < 160) « 64: PRINT CHR$ ( 

A):: NEXT F: PRINT : RETURN 

6520 PRINT : PRINT CHR* <4)"PRI1": PRINT CHR* <9)"80N" 

6530 FOR P = 1024 TO 1920 STEP 128: GOSUB 6510: NEXT P 

6540 FOR P = 1064 TO 1960 STEP 128: GOSUB 6510: NEXT P 

6550 FOR P = 1104 TO 2000 STEP 128: GOSUB 6510: NEXT P 

6560 PRINT CHR* (4)"PR«0"s RETURN 
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FE 
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CERChRE/ORDI MARE- ED I TARE RECORD 
ANNO = 1985 


ESPLORARE CAMPO DATI 
LISTARE PRESCRIZIONI PAZIENTE 
TORNARE AL MENU' PRINCIPALE 


, flB. PER. SCEGLIERE-: 


PUOI USARE ANCHE L 


_ PER ESEGU 
UCE SU 0 Gli 


RE 


Il sottomenù deH’opzione cercare/ordinare/editare record, che serve per 
controllare i dati. 
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TAVOLA 1 

- VARIABILI NUMERICHE E STRINGA 

Variabili 

numeriche 

Funzione 

MI 

Variabile menù (1-9) 

M2 

Voce menù (0-8) 

HT 

Tabulazione orizzontale per le voci del menù 

S 

Numero delle voci di menù nel set da visualizzare 

CS 

Scelta corrente posizione del cursore (=M2) 

OS 

Scelta precedente posizione del cursore 

IMO 

Lunghezza della linea di input 

m) 

Tabulazione orizzontale per la linea di input 

w. 

Anno del File che interessa 

w. 

Numero dei nomi di File nel File d"intestazione 

Cl‘/. t CZ/. f C37. 

Valori di conservazione temporanei di CS 

NIX 

Numero dei record in ciascun File 

NF*/. 

Flag che denota il nuovo nome di File 

J1 

Contatore per le corrispondenze totali di esplorazione 

RI ,M 

Spese mediche total i 

R2,N 

Spese Farmaceutiche totali 

HL X 

Spaziatura orizzontale per i menù 

W 

Spaziatura verticale per i menù 

m 

Flag modo edit 

ER 

Flag d'errore d'introduzione dati 

Variabili 

Stringa 

Funzione 

YR$ 

Il valore dell'anno corrente 

FU 

File in corso di lettura o scrittura 

FUXO 

Nomi di File nel File d'intestazione 

I$(M2) 

Variabile di input (temporanea) 

MIO 

Variabili di record nell ambito di ogni File 

MU$(0,M2) 

Stringhe per le selezioni sul menù principale e per i 
titoli di intestazione nei vari moduli 

MUf<1,M2) 

Stringhe per la routine di input dati 

MIMMI ,M2) 

Stringhe per tutte le altre selezioni del menù 
nell'ambito del programma (Ml=2 a 9) 


dischetto esclusivamente per questo 
programma, in modo da poter vedere 
facilmente i file che si trovano sul di¬ 
schetto e impedire che nomi prove¬ 
nienti da altre fonti vengano duplicati 
nei file di APPLIMEDIC. 

La maggior parte delle routine di 
intrappolamento degli errori e di con¬ 
trollo dell’introduzione è situata nelle 
linee 690-1240. Esse sono sistemate 
più ai fini della limpidezza che della 
velocità, dato che alcune sono usate 
solo nelPambito di altre specifiche 
routine: il vantaggio di trovarle in uno 
stesso punto del programma rende tol¬ 
lerabile il costo di una lieve perdita di 
efficienza. 

Personalizzazione 

Se per qualche motivo non vi piac¬ 
ciono gli HOME d’effetto, potete eli¬ 
minarli individuando tutti i CALL 
768, 820, 857 e 913 e sostituendoli con 
istruzioni HOME. Dovete inoltre eli¬ 
minare la linea 5790 e non digitare il 
codice macchina di SCROLLOFF. 

Volendo potete personalizzare an¬ 
che l’opzione di stampa sullo schermo. 
Per conservare la compatibilità con 
varie interfacce di stampante (sia pa¬ 
rallele sia seriali) è stata impiegata la 
routine in Basic di stampa su schermo 
delle linee 6500-6560. Se volete, po¬ 
tete sostituirla con una vostra routine 
più veloce, in linguaggio macchina. 
Inoltre se l’interfaccia con la stampan¬ 
te non è nello slot uno, dovete cambia¬ 
re il riferimento allo slot nella linea 
6520. 


Può anche darsi che occorrano più 
di nove file di pazienti. In tal caso do¬ 
vrete modificare il menù delle linee 
290-590. Sarà bene che consultiate 
Applicando n. 15 per comprendere 
meglio questa sezione prima di modifi¬ 
carla. Sostanzialmente, comunque. 


dovrete modificare l'istruzione boo- 
leana contenuta nelle istruzioni 
VTAB che si trovano fra quelle linee, 
vale a dire OS * (S > 10). Così ridurre¬ 
te a spaziatura semplice le voci del 
menù, ottenendo in tal modo spazio 
sullo schermo per altri pazienti soltan¬ 
to se S => 10. Occorrerebbe inoltre in 
questo caso cambiare il livello di deli¬ 
mitazione di N9£ a linea 5110 e a linea 
2630, che dice quanti file sono permes¬ 
si. Dovete cambiare in conformità an¬ 
che la linea 2320. 

Le variabili 

Nella tavola 1 è visibile un elenco 
parziale delle variabili numeriche e 
stringa utilizzate in APPLIMEDIC. 
La lista non è esauriente, ma com¬ 
prende le variabili più importanti per 
la comprensione del programma. Non 
sono comprese alcune variabili di im¬ 
piego generale e variabili secondarie 
usate come flag. 


Questo programma è disponibile su 
dischetto. L’elenco, i prezzi e le 
modalità d’ordine di questo e degli altri 
dischetti disponibili sono riportati nella 
rubrica Disk Service. 

-¥ 


PAZIENTE 

NOME 


USEPPE 
0MANNA 


TOTALI SPESE 
DATA.ONORARI 


2 6 8 9 


12--03 


4 0 0 0 0 


= STAMPA <ESC > = MENU 1 PRINC . <RTN> = C0NT 


Selezionando dal menù principale l'opzione totali spese, se ne può aver la 
lista complessiva o individuale 
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PER IL TUO APPLE //e & //«. 


Vi piacciono le regate? O preferite esplorare le caverne dell’Olimpo? Oppure vorreste 
avere sul vostro schermo il fantastico gioco della scimmia che scappa arrampicandosi sulle 
pareti lisce di un grattacielo? Siete invece tipi riflessivi e vi dilettate di musica? Non 
preoccupatevi, qui c’è sicuramente quello che fa per voi. Per gli amanti di tanti giochi tutti 
insieme è disponibile una raccolta. Per chi vuole migliorare le proprie capacità di 
programmatore, ecco i trucchi del Basic su dischetto. E tante altre offerte, a prezzi eccezionali. 





BASIC TRICKSFOR THE APPLE. 

35 routine che renderanno molto 
più professionali i vostri pro¬ 
grammi in Basic e che vi sarà 
facilissimo imparare utilizzando il 
manuale e il dischetto offerti in 
elegante confezione a sole 
60.000 lire. 


itm 


Ap» bwpi 



fm*+-* t* mét .. 


SPUD e MUGSHOT.il primo po¬ 
ne due giocatori in antagonismo 
tra loro, il secondo può essere 
giocato da un solo giocatore fino 
a quattro giocatori. Grafica in alta 
risoluzione spettacolare. Richie¬ 
de l’uso delle paddle. Dischetto 
con programma e manuale offerti 
in elegante confezione a sole 
50.000 lire. 



PEN PAL. Un word processor 
che può sviluppare fino a 254 
colonne per riga, con possibilità 
di scroll orizzontale e verticale. 
Giustificazione, numerazione 
delle pagine, intestazioni. Cerca 
e rimpiazza testo. Possibilità di 
editing di programmi in Basic. 
Predisposizione per invio via mo¬ 
dem dei testi. Dischetto con pro¬ 
gramma e manuale in elegante 
confezione a 60.000 lire. 



INSTANT RECALI. Un potente 
Data Base i cui file singoli posso¬ 
no superare i 28.000 caratteri. 
Accesso simultaneo a 8 file, per 
un totale di oltre 229.000 caratte¬ 
ri. Ogni file può essere caricato in 
5 secondi. Ricerca velocissima. 
Campi determinabili dall’utente. 
Possibilità di editing sofisticato. 
Dischetto e manuale offerti in ele¬ 
gante confezione a sole 60.000 
lire. 






APPLE GAMES. 11 giochi: Flip-Flop 
Mastermind, Towers, Sherlock’s home, 
Attack of thè Zargons, Phaser Practice, 
Acey-Ducey, Big government, Tic-Tac- 
Toe, Qubic, Depth charge. E tre pro¬ 
grammi di utilità: Shape table generator, 
Opening ceremonies, Master catalog. 
Per alcuni giochi sono richieste le padd¬ 
le o il joystick. Dischetto con program¬ 
ma e manuale in elegante confezione a 
60.000 lire. 



APE ESCAPE. Una scimmia è 
fuggita dallo zoo e si arrampica di 
finestra in finestra lungo le pareti 
di un grattacielo. Elicotteri le ron¬ 
zano attorno e il guardiano dello 
zoo la insegue. Riuscirà a rag¬ 
giungere il tetto e la libertà? Gra¬ 
fica a colori. Dischetto con pro¬ 
gramma e manuale in elegante 
confezione a sole 50.000 lire. 


BERMUDA RACE. Un’esaltante 
regata nella quale voi siete al co¬ 
mando di una barca con quindici 
uomini d’equipaggio. Tutto di¬ 
pende dalla vostra abilità di skip¬ 
per. Il programma è ampiamente 
documentato su Applicando n. 
17, Giugno 1985. Dischetto con 
programma e manuale in elegan¬ 
te confezione a 50.000 lire. 


CAVES 0F OLYMPUS. Oltre a 
una grafica a colori ultraprofes¬ 
sionale, questo gioco di abilità 
sfodera suoni ed effetti speciali di 
qualità nettamente superiore. Di¬ 
vertente, intrigante e irresistibile. 
Dischetto con programma e ma¬ 
nuale in elegante confezione a 
sole 50.000 lire. 


MUSIC GAMES. 12 programmi 
educativi e divertenti sul filo delle 
7 note. Senza bisogno d’altro, il 
vostro Apple si tramuterà in un 
docile strumento musicale dal 
quale imparare e col quale diver¬ 
tirsi. Sono richieste le paddle o il 
joystick. Dischetto con program¬ 
ma e manuale in elegante confe¬ 
zione a sole 50.000 lire. 


REGATTA. Un gioco entusiasmante che 
farà impazzire marinai esperti e mene 
esperti di qualunque età. Ogni concor¬ 
rente ha a disposizione una barca e un 
circuito. Poi ci sono i venti, gli ostacoli, 
gli imprevisti... Una grafica realistica vi 
farà volare tra le onde. II programma* 
ampiamente documentato su Applican¬ 
do n. 17, Giugno 1985. Dischetto con 
programma e manuale in elegante con¬ 
fezione a sole 50.000 lire. 




Compilare e spedire il tagliando qui sotto a Applicando , Editronica Srl., Corso Monforte 39, 20122 Milano 


Sì! Inviatemi subito, senza aggravio di spese 
postali, il o i programmi contrassegnati con 
una crocetta. 

□ REGATTA. 50.000 lire. 

□ CAVES OF OLYMPUS. 50.000 lire. 

□ APE ESCAPE. 50.000 lire. 

□ MUSIC GAMES. 50.000 lire. 

□ APPLE GAMES. 60.000 lire. 

□ BASIC TRICKS F0R THE APPLE. 60.000 lire. 

□ BERMUDA RACE. 50.000 lire. 

□ INSTANT RECALL. 60.000 lire. 

□ PEN PAL. 60.000 lire. 

□ SPUD e MUG SHOT. 50.000 lire. 


Cognome...Nome. 

Via.Cap. 

Città.Prov. 

Scelgo la seguente formula di pagamento: 
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Gli manca la parola? Ora 
non più! Con una piccola 
routine in linguaggio 
macchina il vostro Apple 
Il potrà finalmente 
pronunciare tutto quello 
che pensa e tutto quello 
che vorrete. Non è il 
primo che riesce a fare 
questo, ma di certo è fra i 
pochi programmi di 
sintesi vocale 
completamente 
trasparenti all’utente e di 
estrema semplicità 
d’uso. 


Apple, 
delle mie 


appiè 

brame... 


C he cos’è una parola? Può essere 
considerata come una rapidissi¬ 
ma successione temporale di due tipi 
di eventi sonori elementari: il silenzio 
e un qualcosa che non è silenzio e che 
per comodità si può chiamare click. E 
si può utilizzare questo concetto, certo 
grossolano e magari scientificamente 
inaccettabile, ma estremamente sem¬ 
plice e utile, per intenderci quando 
parliamo di voce, di parole pronuncia¬ 
te, di suono in generale. 

Il problema della sintesi vocale da 
parte di un computer può essere scom¬ 
posto in tre momenti distinti: analisi 
della voce umana, cioè della successio¬ 
ne di silenzi e click che la costituiscono 
(FLOWCH.2); memorizzazione op¬ 
zionale del risultato di tale analisi 


(FLOWCH.3); resintesi della voce 
umana, cioè della successione di silen¬ 
zi e click a partire dall’analisi 
(FLOWCH.4). 

Analisi delia voce 

La fonte sonora potrà essere la voce 
registrata su nastro magnetico, o even¬ 
tualmente in diretta tramite microfo¬ 
no; il vostro Apple II dovrà ascoltarla 
(cioè leggere il segnale presente all’in¬ 
gresso per il registratore a cassette = 
locazione $C060 = TAPEIN) e dovrà 
essere in grado di capire se sta udendo 
un silenzio o un click. 

Nel caso del silenzio, il valore pre¬ 
sente in TAPEIN non cambierà di se¬ 


gno, mentre cambierà di segno nel ca¬ 
so che compaia un click. Come a dire 
che un click farà cambiare da 0 a 1 o 
viceversa il bit più a sinistra (bit 7) di 
TAPEIN. 

Nel listato 1 potete notare (righe 26, 
27, 28) che il computer legge la loca¬ 
zione TAPEIN e mette nella locazione 
NEW il valore trovatovi, dopodiché 
confronta questo valore con quello 
che aveva letto la volta precedente e 
che si trova ora nella locazione OLD. 
Se questi valori hanno segno diverso 
(cioè è diverso il bit 7), il computer 
capisce di aver sentito un click. 

Il confronto dei segni viene eseguito 
tramite una operazione di OR esclusi¬ 
vo fra NEW e OLD che accende il flag 
segno sul registro di stato nel caso che 
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NEW e OLD contengano valori diver¬ 
si per segno; il programma mette poi 
in OLD il valore che era in NEW e 
riprende a leggere TAPEIN. 

Un punto critico da considerare è la 
frequenza con cui il computer esplora 
la locazione TAPEIN. Se lo fa una 
volta al secondo l’analisi del suono sa¬ 
rà pessima. Se lo fa 3.000 volte al se¬ 
condo sarà buona. Se lo fa con fre¬ 
quenza maggiore, meglio ancora. Bi¬ 
sogna però tenere presente che all’au- 
mentare della frequenza migliora sì la 
qualità dell’analisi del suono, ma tale 
analisi, per essere memorizzata, ri¬ 
chiederà più memoria. 

Se considerate la parte del program¬ 
ma che sintetizza la voce mentre la sta 
ascoltando da registratore, senza me¬ 
morizzarne la codifica (Reai Time 


Sound), è chiaro che in questo caso il 
limite all’accuratezza di tale analisi 
non è imposto da un limite di memoria 
(non c’è infatti nessun consumo di me¬ 
moria), bensì dalla velocità con cui il 
computer riesce a leggere la locazione 
TAPEIN e il limite a tale velocità di 
lettura è posto dal tempo che il compu¬ 
ter impiega a eseguire le 9 o 10 istru¬ 
zioni di linguaggio macchina che costi¬ 
tuiscono questa parte di programma. 

L’esecuzione di queste istruzioni ri¬ 
chiede 27 cicli macchina, pari a circa 
27 milionesimi di secondo, per cui il 
computer riesce a esplorare la locazio¬ 
ne TAPEIN 37.000 volte al secondo: 
come a dire che la più alta frequenza 
intelligibile e riproducibile dal compu¬ 
ter in reai time è di 37.000 Hertz (e non 
è poco!). 


Se considerate invece la parte di 
programma che analizza la voce e ne 
memorizza la codifica (Recording), la 
frequenza di lettura di TAPEIN varia 
in funzione della durata del ciclo di 
ritardo (righe 52-55 del listato 1), a sua 
volta dipendente dal valore messo in 
SPEED. 

Se SPEED vale 1 avremo la massi¬ 
ma frequenza di esplorazione di TA¬ 
PEIN, la massima accuratezza nella 
codifica del parlato, ma anche il massi¬ 
mo consumo di memoria; al contrario, 
se SPEED vale 255, avremo i minimi 
valori di tutti questi parametri. 

Un compromesso ragionevole tra 
accuratezza del parlato e consumo di 
memoria può ottenersi con SPEED = 
5. Per tale valore, la massima frequen¬ 
za sonora riproducibile risulta di circa 


LISTATO 1. Disassemblato del file binario “ascolta & parla” creato dal listato 2 


SOURCE FILE: ASCOLTA 4 PARLA 


0296:A5 

06 


52 AGAIN1 

LDA 

SPEED 

02FC : EA 


106 

NOP 


0000: 



1 ; 



0298:85 

05 


53 

STA 

DELAY 

02FD:EA 


107 

NOP 


0000: 



2 : 



029A:C6 

05 


54 UAI71 

DEC 

DELAY 

02FE:EA 


108 

NOP 


0000: 



3 ; *ASC0LTA&PARLA* 

029C:D0 

FC 


55 

BNE 

UAIT1 

02FF:.EA 


109 

NOP 


0000: 



4 ; 



029E:AD 

60 

CO 

56 

LDA 

TAPEIN 

0300: 


110 ; 



0000: 



5 ; 

02A1:85 

02 


57 

STA 

NEU 

0300: 


111 : 



- NEXT 0BJEC7 FILE NAME IS ASCOLTA 

02A3:45 

03 


58 

E0R 

OLD 

0300: 


112 : TALKING 


& 

PARLA.OBJO 



02A5 :30 

08 


59 

BMI 

CLICK1 

0300: 


113 ; 



0260: 



6 

0RG 

$260 

Q2A7:10 

00 


60 

BPL 

SYL1 

0300: 


114 ; 



0000: 



7 PQINTL 

EQU 

$00 

02A9 : EA 



61 SYL1 

NOP 


0300:A9 

05 

115 

LDA 

#5 

0001: 



8 P0INTH 

EQU 

$01 

0 2AA : 18 



62 

CLC 


0302:85 

06 

116 

STA 

SPEED 

0002: 



9 NEU 

EQU 

$02 

02AB: 26 

04 


63 

ROL 

BYTE 

0304:A0 

00 

117 PARLA 

LDY 

#$00 

0003: 



10 OLD 

EQU 

$03 

02AD : 50 

08 


64 

BùC 

NEUBIT1 

0306 :B1 

00 

118 PI 

LDA 

(POINTL),Y 

0004: 



11 BYTE 

EQU 

$04 

Q2AF:AD 

30 

CO 

65 CLICK1 

LDA 

SPEAKER 

0308:85 

04 

119 

STA 

BYTE 

0005: 



12 DELAY 

EQU 

$05 

02B2:38 



66 

SEC 


030A:C9 

FF 

120 

CMP 

#$FF 

0006: 



13 SPEED 

EQU 

$06 

02B3:26 

04 


67 

ROL 

BYTE 

030C:F0 

30 

121 

BEQ 

END 

C010: 



14 STR0BE 

EQU 

$CQ10 

02B5:50 

00 


68 

BÙC 

NEUBIT1 

030E:A2 

07 

122 

LDX 

#$07 

C000: 



15 KEYBOARD EQU 

$C000 

02B7:A5 

02 


69 NEUBIT1 

LDA 

NEU 

0310:A5 

06 

123 AGAIN2 

LDA 

SPEED 

CO 30: 



16 SPEAKER EQU 

$C030 

0269:85 

03 


70 

STA 

OLD 

0312:85 

05 

124 

STA 

DELAY 

C060 : 



17 TAPEIN 

EQU 

$C060 

02BB:CA 



71 

DEX 


0314 :C6 

05 

125 WAIT2 

DEC 

DELAY 

0260: 



18 ; 



02BC:10 

D8 


72 

BPL 

AGAIN1 

0316 : DO 

FC 

126 

BNE 

UAIT2 

0260: 



19 : 



02BE:A5 

04 


73 

LDA 

BYTE 

0318 :EA 


127 

NOP 


0260: 



20 : REALT IME SOUND 

02C0:91 

00 


74 

STA 

< P0INTL),Y 

031 ? :EA 


128 

NOP 


0260: 



21 ; 



02C2:E6 

00 


75 

INC 

PQINTL 

031A: 26 

04 

129 

ROL 

BYTE 

0260: 



22 ; 



02C4:D0 

08 


76 

BNE 

NI 

031C:B0 

09 

130 

BCS 

CLICK2 

0260:AD 

10 

CO 

23 

LDA 

STROBE 

02C6:E6 

01 


77 

INC 

P0INTH 

031E : 90 

00 

131 

BCC 

SYL2 

0263:AD 

60 

CO 

24 

LDA 

TAPEIN 

02C8:A5 

01 


78 

LDA 

P0INTH 

0320 :EA 


132 SYL2 

NOP 


0266:85 

03 


25 

STA 

OLD 

02CA.-C9 

96 


79 

CMP 

#$9ó 

0321:EA 


133 

NOP 


0268:A0 

60 

CO 

26 AGAINO 

LDA 

TAPEIN 

02CC:F0 

08 


80 

BEQ 

CHECK 

0322 :EA 


134 

NOP 


0268:85 

02 


27 

STA 

NEU 

02CE:AD 

00 

CO 

81 NI 

LDA 

KEYBOARD 

0323:EA 


135 

NOP 


026D:45 

03 


28 

E0R 

OLD 

02D1:10 

CI 


82 

BPL 

ASCOLTA 

0324 :EA 


136 

NOP 


026F: 30 

03 


29 

BMI 

CLICK0 

02D3:AD 

10 

CO 

83 

LDA 

STROBE 

0325:50 

09 

137 

BùC 

NEUBIT2 

0271:EA 



30 

NOP 


02D6:A9 

FF 


84 CHECK 

LDA 

#$FF 

0327 :EA 


138 CL1CK2 

NOP 


0272:10 

03 


31 

BPL 

SYLO 

0208:91 

00 


85 

STA 

(P0INTL),Y 

0328:EA 


139 

NOP 


0274:AD 

30 

CO 

32 CLICK0 

LDA 

SPEAKER 

02DA:A6 

00 


86 CO 

LDX 

P01NTL 

0329 :EA 


140 

NOP 


0277:A5 

02 


33 SYLO 

LDA* 

NEU 

02DC: DO 

02 


87 

BNE 

CI 

032A:EA 


141 

NOP 


0279:85 

03 


34 

STA 

OLD 

02DE:C6 

01 


88 

DEC 

P0INTH 

0328:AD 

30 CO 

142 

LDA 

SPEAKER 

027B:AD 

00 

CO 

35 

LDA 

KEYBOARD 

02E0:C6 

00 


89 CI 

DEC 

P0INTL 

032E: 50 

00 

143 

BùC 

NEUBIT2 

027E: 10 

E8 


36 

BPL 

AGAIN0 

02E2: DO 

06 


90 

BNE 

C2 

0330:EA 


144 NEUBIT2 NOP 


0280: 



37 ; 



02E4:A5 

01 


91 

LDA 

P0INTH 

0331:EA 


145 

NOP 


0280: 



38 ; 



02E6 :C9 

16 


92 

CMP 

#$16 

0332 :EA 


146 

NOP 


0280: 



39 : RECORDING 


02E8:F0 

1A 


93 

BEQ 

PARLA 

0333 :CA 


147 

DEX 


0280: 



40 ; 



02EA:B1 

00 


94 C2 

LDA 

(P0INTL),Y 

0334:10 

DA 

148 

BPL 

AGAIN2 

0280: 



41 ; 



02EC:C9 

FF 


95 

CMP 

#$FF 

0336:E6 

00 

149 

INC 

POINTL 

0280:AD 

10 

CO 

42 

LDA 

STROBE 

02EE:D0 

EA 


96 

BNE 

CO 

0338 : DO 

02 

150 

BNE 

P2 

0283:A0 

00 


43 

LDY 

#$00 

02F0:A9 

FE 


97 

LDA 

#$FE 

033A:E6 

01 

151 

INC 

POINTH 

0285:84 

00 


44 

STY 

PQINTL 

02F2:91 

00 


98 

STA 

(POINTL),Y 

033C:D0 

C8 

152 P2 

BNE 

PI 

0287:A9 

16 


45 

LDA 

#$16 

02F4: DO 

E4 


99 

BNE 

CO 

033E : 60 


153 END 

RTS 


0289:85 

01 


46 

STA 

P0INTH 

02F6:EA 



100 

NOP 


033F : 


154 ; 



028B:A9 

05 


47 

LDA 

#05 

02F7:EA 



101 

NOP 


033F: 


155 ; 



028D: 85 

06 


48 

STA 

SPEED 

02F8:EA 



102 

NOP 


033F: 


156 | M.M.SOFTWARE 

028F:AD 

60 

CO 

49 

LDA 

TAPEIN 

02F9:EA 



103 

NOP 


033F: 


157 ; *01/10/84/* 

0292:85 

03 


50 

STA 

OLD 

02FA : EA 



104 

NOP 







0294:A2 

07 


51 ASCOLTA LDX 

#$07 

02FB:EA 



105 

NOP 


*** SUCCESSFUL ASSEMBLY: NO ERRORS 
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FLOWCHARTN. 1. 

Struttura generale della routine in linguaggio macchina 

f pr i . TIMF eni IMH ^1 Ascolto e riproduzione della voce 

V u ' ** ^>UU1NU ) senza memorizzazione 

( ncmnniMr ^ Ascolto e riproduzione della voce 

RECQR.DING J con memorizzazione 
(talking) Riproduzione della parola in memoria 


3.500 Hertz (più che sufficiente per 
riprodurre un parlato), con un consu¬ 
mo di memoria pari a 3.500/8 byte/sec. 

Memorizzazione 

dell’analisi 

Questo passo è facoltativo: permet¬ 
te al computer di ripetere la parola 
anche se non la sta ascoltando. 

Per memorizzare la parola il pro¬ 
gramma mette in memoria una serie di 
0 e 1 (0= silenzio, 1= click). Visto che 
un byte è costituito da 8 bit, e che ogni 
bit può appunto codificare per 0 o 1, 
ogni byte può contenere la codifica di 
una serie di 8 eventi sonori elementari. 
Per impacchettare 8 bit in un byte (ve¬ 
di listato 1, righe 62-63,66-67), per 8 
volte caricate nel carry il valore (0-1) 
da inserire nel byte in costruzione ed 
eseguite (v. FLOWCH.3) una opera¬ 
zione di rotazione a sinistra del byte 
stesso (ROL BYTE). 

La zona di memoria riservata alla 
memorizzazione della parola va da 
$1600 a $95FF. Come codice di fine 
parola usate il valore 255 ($FF). Ov¬ 


viamente un subroutine del program¬ 
ma (CHECK) si occupa di sostituire 
tutti gli $FF eventualmente presenti 
nella codifica della parola con $FE (la 
differenza a livello di pronuncia non è 
percepibile). 

Resintesi della 
voce umana 

Il computer resintetizza la voce 
umana, o direttamente servendosi del¬ 
l’analisi della voce stessa mentre la sta 


udendo (reai time sound), o servendo¬ 
si dell’analisi che aveva preventiva¬ 
mente memorizzato (Talking). 

Nel caso di sintesi vocale in reai ti¬ 
me, il computer non dovrà fare altro 
che emettere un click sul proprio alto- 
parlante ogni volta che un click si pre¬ 
senterà alTingresso per il registratore 
(FLOWCH.2). 

Nel caso di sintesi vocale a partire 
dall’analisi memorizzata, il computer 
dovrà leggere bit per bit tale analisi e 
ogni volta che troverà un bit = 1, do¬ 
vrà emettere un click sul proprio alto- 


LISTATO 2. Listato del programma basic “sintesi vocale” 


0 REM «****#****#**#*«*#***## 

1 REM * * 

2 REM * SINTESI VOCALE * 

3 REM * * 

4 REM * BY MAURO MONTANARI * 

5 REM * VIA M.L.KING 14 * 

6 REM * VIADANA (fth * 

7 REM * TEL.0375/830273 * 

8 REM * (0 1985 BY APPL1DWD0* 

9 REM ************************ 

10 H1MEM: 5432: TEXT : HOME : INVERSE : HTAB 15: VTAB 3: PR 

INT 1 ’: HTAB 15: VTAB 4: PRINT 1 LA VOCE 

HTAB 15: VTAB 5: PRINT 1 N0RMAL :D$ = CHR 

$ (4) 

11 P0KE 34,7: HOME : VTAB 12: HTAB 7: PRINT ’PROGRtfftt DI S 
INTESI VOCALE’: VTAB 14: HTAB 16: PRINT ’A CURA DI’: VTA 
B 16: HTAB 13: PRINT 'MURO MONTANARI* 

12 G0SUB 900 

100 P0KE 34,7: HOME 

110 PRINT ’l: COLLEGA IL REGISTRATORE SU CUI HAI INCIS 
0 LA FRASE DA CODIFICARE E MET= TIL0 IN <PLAY>.’: PR 
INT 

120 PRINT ’2: REGOLA IL VOLUME SINO A CHE LA VOCE R1SUL 
TA CHIARA *' PRINT 

130 PRINT ’3:'<RETURT4> PER COMINCIARE LA CODIFICA DELLE 
PAROLE.’: PRINT 

140 PRINT ’4: <RETURN) PER TERMINARE LA CODIFICA DELLE 
PAROLE E RISENTIRLE.’: PRINT 
200 CALL 608: REM ASCOLTA E PARLA 
210 HOME 

220 PRINT ’l: RIASCOLTO’: PRINT 
230 PRINT ’2: SALVA SU DISCO LA PAROLA.’: PRINT 
240 PRINT ’3: RECUPERA DA DISCO LA PAROLA.’: PRINT 
250 PRINT ’4: CODIFICA m NUOVA PAROLA.’: PRINT 
260 PRINT *5: FINE* 

300 G0SUB 800: IF V < 1 OR V ) 5 THEN 300 
310 0N V GOTO 400,500,600,100,700 

400 REM RIASCOLTO 

401 P0KE 0,0: P0KE 1,22: CALL 768: GOTO 300 

500 HOME : REM SALVA SU DISCO 

501 INPUT 'NOME CON CUI SALVARE LA PAROLA:’;C$: IF C$ = ” 
THEN 210 

510 X2 = PEEK (0) ♦ 256 * PEEK <1):X1 = 5632:L = X2 » XI 


♦ 1 

515 IF L > 32767 THEN L = 32767: POKE 38398,255 
520 PRINT : PRINT ’BSAVE’C*’,A5632,L’L 
530 PRINT D$’8SAVE’C$’,A5632,L’L 
540 GOTO 210 

600 HOME : REM RECUPERA DA DISCO 

601 INPUT 'NOME DELLA PAROLA :’ :C«: IF C$ = ” THEN 210 
610 PRINT : PRINT ’BLOAD’Cf.A5632* 

620 PRINT : PRINT ’POKEO,0 :PÓKE1,22:CALL768: REM RIASCOLTO’ 
630 PRINT D$*BL0AD'C$’,Ao632' 

640 POKE 0,0: POKE 1.22: CALL 768: GOTO 210 
700 TEXT : HOME : END 

800 VTAB 21: HTAB 18: PRINT ’* *’: HTAB 20: VTAB 21: FLAS 

H : PRINT ’ ’: N0RMAL 

801 POKE - 16368,0: WAIT - 16384.128:V = PEEK (- 16384) 

- 176: POKE - 16368,0: RETURN 

900 REM METTI IN MEMORIA LA SUB 'ASCOLTA E PARLA' 

901 CS = 0: FOR J = 608 T0 831: READ X: POKE J,X:CS = CS ♦ 
X: NEXT : IF CS = 26637 THEN RETURN 

902 VTAB 20: PRINT 'ERRORE NELL'INSERIRE I DATI. CONTROLLA 

LE LINEE 910-913.’: END 

910 DATA 173,16,192.173.96.192.133,3.173,96.192,133,2,69.3, 
48,3.234.16.3,173.48.192.165,2.133,3,173,0.192,16.232,1 
73,16.192,160,0.132,0,169.22.133,1.169,5,133,6,173,96,1 
92,133.3,162.7.165.6.133,5,198.5,2Ó8,252 

911 DATA 173.96,192,133.2.69.3,48,8.16,0.234,24,38,4.80,8.1 
73,48.192.56,38.4.80,6.165,2.Ì33.3,202,16,2Ì6.165.4,145 

^ , 173 , ll Ì l^ 8 il9 Ó Ì5è 1 14è I 6 2 lU 1 0 0 i08°5 8 Ì98 3 ’ d ' 19Ì,Ì<Ì ’ 1 

912 DATA 1.198.0.208.6.165.1.201.22,240,26,177,0.201.255.20 
8.234.169.254,145,0,208,228.2J4,234.234.234.234.234.234 
,234,234,234,169.5,133.6,160.0,177,0.133.4,201,255,240, 
48.162.7.165.6.133.5.198,5.208.252.234.234 

913 DATA 38,4.176.9,144.0,234.234.234.234.234,80,9,234,234. 
234,234,173.48.192.80.0,234,234,234,202,16,218,230,0,20 
8,2,230.1,208,200,96,0 

915' REM GENERAL INFORMATION 

920 REM ASCOLTA....608 ($260) REGISTRA...640 ($280) 

PARLA.768 ($300) 

921 REM PER FAR PRONUNCIARE LA PAROLA PRECEDENTEMENTE CARI 
=CATA IN MEMORIA: POKARE IN $00,$01 L'INIZIO DELLA PAR 
0=LA E QUINDI 'CALL PARLA' 

922 REM ASCOLTA&PARLA,A$260,L$DF 
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FLOWCHART N. 2-Real time sound 



FLOWCHART N. 3-Recording 



parlante ($0)30 = SPEAKER). 

Per leggere bit a bit un byte di codi¬ 
fica sarà sufficiente eseguire per 8 vol¬ 
te una operazione di rotazione a sini¬ 
stra del byte in esame (ROL BYTE) 
testando quindi il carry che risulterà 
acceso se si deve pizzicare l’altopar- 
lente, spento se si deve fare silenzio. 
(FLOWCH.4) 

E di ovvia e fondamentale impor¬ 
tanza che la lettura della memoria pro¬ 
ceda alla stessa velocità con cui il com¬ 
puter aveva esplorato TAPEIN, altri¬ 
menti la pronuncia della parola risul¬ 
terà accelerata o rallentata, proprio 
come quando si suona un disco ai giri 
sbagliati. 

La routine 
inassembly 

La parte Basic (listato 2) gestisce la 
routine in assembly; questo program¬ 
ma può servire a prendere confidenza 
con la routine vera e propria in lin¬ 
guaggio macchina, ma poi potrà essere 
più vantaggioso lavorare manualmen¬ 
te, impartendo i comandi direttamen¬ 
te da monitor: 


260G. RE AL TIME SOUND 

Return.RECORDING 

Return.TALKING 

0:0016 N 300G.TALKING 


in modo da effettuare alcuni interventi 
che il Basic non sa fare. 

Dopo aver digitato il programma 
Basic, dandogli il RUN, entrerà in me¬ 
moria la routine in assembly; dovrete 
a questo punto: 

a) collegare il registratore al compu¬ 
ter e premere il tasto play (ovvio che 
sulla cassetta avrete preventivamente 
inciso una frase). 

b) regolare il volume del registrato- 
re sino a che la pronuncia del compu¬ 
ter risulta chiara e comprensibile (ri¬ 
cordate che serve un volume piuttosto 
alto). 

c) riavvolgere il nastro sino all’inizio 
della frase, premere il tasto play del 
registratore e quindi RETURN per 
cominciare la codifica della frase. 

d) premere nuovamente RETURN 
al termine della frase per interrompe¬ 
re la codifica e riascoltare la frase così 
come il computer l’ha codificata. 

A questo punto il programma vi 
chiederà di scegliere fra alcune opzio¬ 
ni: riascolto della frase, salvataggio o 
recupero della frase da disco, codifica 
di una nuova frase, uscita dal pro¬ 
gramma. 


■ 
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FLOWCHART N. 4-Talking 




* TECflOPGUJER * 
CQH1PUTER SHOP 

TUTTO APPLE 

MONFALCONE (GO) 

VIA S. GIACOMO 30 TEL. 0481/44260 

QUOTAZIONI SPECIALI IVA COMPRESA 

MODEM 300/600/1200 BAUD ADATTO A 
APPLE E A QUALSIASI SISTEMA MUNITO 
DI RS232 L. 300.000 

SCHEDA 80 COLONNE CON SOFT SWITCH 

L. 170.000 

MOUSE completo di software 

L. 145.000 

S8fH SCHEDA DI CAMPIONAMENTO VO¬ 
CALE E MUSICALE PER LA SINTESI DI 
QUALSIASI SUONO REGISTRATO OAL 
VIVO CON UN MICROFONO COMPLETO 
DI BATTERIA ELETTRONICA PRO¬ 
GRAMMABILE L. 350.000 

BETA SYNTAURI SISTEMA MUSICALE 
POLIFONICO COMPLETO DI TASTIERA 
A 5 OTTAVE, 2 PEDALI, 2 SCHEDE DI 
SINTESI, 1 SCHEDA INTERFACCIA TA¬ 
STIERA, REGISTRATORE DIGITALE A 
16 PISTE INCORPORATO L. 1.450.000 

CAD SISTEMA GRAFICO PROFESSIONA¬ 
LE COMPRENSIVO DI SCHEDA I28k RAM, 
JOYSTICK PROFESSIONALE, SOFTWARE 
E MANUALE IN ITALIANO, OTTIMO PER 

GRAFICI ED ARCHITETTI L. 980.000 

SCHERMO ANTIRIFLESSO IN SPECIALE 
FIBRA OTTICA APPLICABILE A QUAL¬ 
SIASI MONITOR 12” L. 18.000 

DISCHI PER APPLE E SIMILI UTILIZZA¬ 
BILI SULLE 2 FACCE, 5 ANNI DI GARAN¬ 
ZIA SCRITTA! 

MINIMO 30 PEZZI L. 3.100 

JOYSTICK CON APPLE CON TIMER E 
2 PULSANTI L. 43.000 

DRIVER 140K PER APPLE L. 390.000 

DRIVER 320K PER APPLE COMPATIBILE 
PRO - DOS L. 480.000 

DISPONIAMO DI UN VASTO ASSORTI¬ 
MENTO DI SCHEDE E PERIFERICHE. 
RICHIEDETECI IL NOSTRO CATALOGO 
GRATUITO COMPLETO DI PREZZI. 

GARANZIA 6 MESI CON SOSTITUZIONE 
IMMEDIATA IN CASO DI GUASTO. 
SPEDIZIONE IN CONTRASSEGNO. ORDI¬ 
NI TELEFONICI AL 0481/44260. 

MERCE PRONTA CONSEGNA. 

PER ORDINI SUPERIORI A L. 90.000 
IMBALLO E SPEDIZIONE GRATIS. 


IVA COMPRESA 

* TECTIOPOUJER * 
COmPUTER SHOP 

34074 MONFALCONE(GO) 

Via S. Giacomo, 30 (angolo Via S. Anna) 
TEL. 0481/44260 



Altre possibilità 

Vediamo infine quel che si può fare 
in più, lavorando manualmente. In¬ 
nanzitutto è possibile risparmiare me¬ 
moria salvando su disco soltanto la pa¬ 
rola vera e propria, senza il silenzio 
che in genere la precede o la segue e 
che è costituito da una lunga serie di 
zeri facilmente riconoscibile. Ricorda¬ 
tevi comunque di mettere un codice di 
fine parola ($FF) alla fine del campo 
che salverete su disco. 

Inoltre, una volta salvate su disco, le 
parole possono essere montate in un 
unico file binario caricandole in me¬ 
moria una di seguito all’altra. Questo 
file sarà quindi a sua volta salvato su 
disco e costituirà una sorta di vocabo¬ 
lario, alle cui parole potrete accedere 
pokando in $00 e $01 l’indirizzo di par¬ 
tenza della parola ($00 = byte basso, 
$01 = byte alto) e quindi eseguendo 
una CALL alla subroutine di pronun¬ 


cia (CALL 768, ma la routine è perfet¬ 
tamente portatile per cui potete met¬ 
terla in memoria dove ritenete più op¬ 
portuno). 

Per pronunciare una parola il cui 
inizio sia a S1600 dovrete fare: 
POKE 0,0: POKE 1, 22:CALL 768 
Infine, per salvare su disco la routi¬ 
ne in assembly dovrete dare questo 
comando: 

BSAVE ASCOLTA&PARLA, 
A$260, L$DF 

Mauro Montanari 


Questo programma è disponibile su di¬ 
schetto. L’elenco, i prezzi e le modalità 
d’ordine di questo e degli altri dischetti 
disponibili sono riportati nella rubrica 
Disk Service. 

Unitamente al programma, 
troverete una simpatica 
dimostrazione dei suo 
funzionamento : Ed è subito sera, 
una delle più famose liriche di 
Quasimodo. 

- ¥ 
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Gira, gira, gira, gira, gira, gira, 
gira, gira, gira, gira, gira... 

30 milioni di volte. 

E la risposta è sempre perfetta. 



Durata superiore - Verbatim è runico produttore in grado di offrirvi floppy disk 
con una durata media della vita di 30 milioni di giri. 10 volte di più di 
quanto previsto dalle norme in vigore. Ma questo è solo l’inizio. 


Affidabilità totale -1 floppy disk Verbatim offrono 
il massimo dell’affidabilità. Merito dell’avanzata ed 
esclusiva tecnologia, applicata sia nel trattamento 
della superficie sia nel procedimento di lubrificazione, 
che preserva e riduce l’usura delle testine. 


Qualità garantita - Ogni floppy disk Verbatim è 
sottoposto a 70 controlli di qualità di tipo chimico, 
meccanico ed elettronico, ed è garantito al 100% per 
l’assenza di errori. 

Provate oggi stesso i floppy disk Verbatim. 
Scoprirete la differenza qualitativa, ogni giorno, in 
ogni loro risposta. Sempre perfetta. 

I floppy disk Verbatim sono disponibili in una 
gamma completa da 8, 5f e 3 t pollici. 


n 


Per ulteriori informazioni inviare il coupon alla VERBATIM ITALIA S. 


P-A. 


Minidisk 


Nome_ 

Professione 

Indirizzo_ 

Città_ 


Cognome 


Cap 


i 


M \brbatim 

Leader nel tempa 


VERBATIM ITALIA S.p.A - Via Cemaia, 2 - 20121 MILANO - Telefono: 65.44.31/2/3/4/5 - Telex: 340640 VERBITI 













Un’idea per chi nell’oroscopo "non crede": scoprire che 
può anche essere una cosa seria, completamente 
diversa dalle due righe di maliziosi e inconcludenti 
consigli che danno le riviste femminili. La 
personalizzazione è completa e assoluta, con tanto di 
tracciato grafico della casa del cielo natale... 


DOS 3/3 

ProDOS +HII 
APPLE T/t +1111 
APPLE //c +1111 


Per file e per segno 


M a tu di che segno sei? Colti alla 
sprovvista, nel bel mezzo della 
conversazione, da questa domanda 
inaspettata, non ci resta che risponde¬ 
re la verità; non abbiamo infatti il tem¬ 
po, la prontezza, il coraggio, di ribat¬ 
tere come vorremmo con una gelida 
frase sarcastica, che stronchi l’interlo¬ 
cutore informandolo che noi agli oro¬ 
scopi non crediamo, abitiamo nel no¬ 
stro secolo e non nel medioevo, siamo 
dei manager, non delle parrucchiere. 

O forse siamo un po’ imbarazzati? 
Sospettiamo, senza ammetterlo, che il 
nostro sapiente intervistatore possa 
cavare dall’informazione dio sa quali 
notizie sul nostro conto, sul carattere, 
il passato, il futuro, le forze e le debo¬ 
lezze della nostra persona? E non so¬ 
lo; credere, infatti, nell’astrologia e di 
conseguenza nell’influenza degli astri 
sulla nostra vita e sul nostro comporta¬ 
mento sarebbe come ammettere resi¬ 
stenza del destino, e ciò per un indivi¬ 
duo razionale è nella maggior parte 
dei casi inaccettabile. 

Niente di più sbagliato! L’astrolo¬ 
gia, infatti, permette, a partire dallo 
studio del grafico natale, che è unico e 
irripetibile, una sorta di impronta digi¬ 
tale dell’anima, di individuare una se¬ 
rie di caratteristiche legate al caratte¬ 
re, e di tracciarne un profilo per molti 
versi vicino alla realtà. 

L’astrologia, quindi, assume il ruolo 
di una disciplina che permette di avere 
un’ulteriore chiave di lettura delle 
azioni umane passate, presenti e futu¬ 
re. A volte, infatti, un determinato 
comportamento può sfuggire alla logi¬ 
ca razionale ed empirica, o quantome¬ 
no non può essere spiegato da essa. Lo 
studio del grafico natale, insomma, 
spesso aiuta a comprendere e ad ana¬ 
lizzare meglio il comportamento uma¬ 
no. 

Non a caso, infatti, numerosi astro- 
logi entrano a far parte di équipe 
scientifiche nei più svariati campi dello 
scibile umano. L’astrologia, quindi, 


ben lungi dall’essere una disciplina 
esaustiva dell’analisi delle azioni uma¬ 
ne è indubbiamente un valido ausilio a 
esse, e permette a volte di vivere in 
maniera meno angosciante gli avveni¬ 
menti quotidiani. 

Questo programma vuole appunto 
dimostrarlo, con un metodo rigoroso. 
È caratterizzato, purtroppo, da un li¬ 
stato interminabile, che non può quin¬ 
di essere pubblicato, e vi viene così 
offerto direttamente su dischetto a un 
prezzo molto favorevole (30 mila lire); 
per ordinarlo utilizzate il buono conte¬ 
nuto nel Disk Service. 

Come usare il 
programma 

OROSCOPO si compone di un li¬ 
stato in Basic e di un file di testo ad 
accesso diretto, deputato all’interpre¬ 
tazione. Il listato, il vero e proprio 
programma, esegue i calcoli per dise¬ 
gnare la carta del cielo natale e contie¬ 
ne 96 istruzioni DATA; il programma, 
infatti, fornisce l’interpretazione per 
otto pianeti sui dieci calcolati. 

Una volta lanciato il programma, 
appare la videata con la richiesta di 
immissione dei dati anagrafici e delle 
coordinate del luogo di nascita. Gli 
INPUT a cui rispondere sono 9: 


Gli unici passi a cui bisogna prestare 
attenzione sono quelli relativi alla dif¬ 
ferenza oraria da Greenwich e ai dati 
di latitudine e longitudine. È bene che 
consultiate attentamente le tavole A, B 
e C che riportano le istruzioni necessa¬ 
rie per una corretta digitazione dei va¬ 
lori richiesti. 

Ultimata l’immissione dei dati, sul¬ 
l’ultima riga del video verrà visualizza¬ 
to il seguente messaggio: 

DOMIFICAZIONE PLACIDUS O 
KOCH? 


Il calcolo della domificazione per¬ 
mette di individuare la posizione delle 
case, e, di conseguenza, dell’Ascen¬ 
dente e del Medio Cielo. Una volta 
premuto il tasto corrispondente alla 
vostra scelta, sul video verranno mo¬ 
strate le posizioni, espresse in Gradi e 
Primi e precedute da un numero roma¬ 
no, delle dodici Case, che rimarranno 
visualizzate finché non premerete un 
tasto qualsiasi. In questa fase di domi¬ 
ficazione vengono eseguiti dei calcoli; 
i risultati sono rappresentati da pecu¬ 
liari righe (cuspidi) che dovrete trac¬ 
ciare, per realizzare la carta del cielo 
natale, sul grafico di base che già porta 
prestampati in posizione fissa i dodici 
segni zodiacali. L’oroscopo è infatti la 
rappresentazione grafica della situa- 


INPUT RICHIESTO 

RISPOSTA 

TIPO VARIABILE 

CAMPO VAR. FORMA ES. 

1) Nome e Cognome 

2) Giorno nascita 

3) Mese nascita 

4) Anno nascita 

5) Ora nascita 

6 ) Di-f-f. da Greenwich 

7) Luogo di nascita 

8) Lonqitudine EST 

9) Latitudine NORD 

Opzionale 
Obbligata 
Obbligata 
Obbligata 
Obbligata 
Obbligata 
Opzionale 
Obbligata 
Obbligata 

AHanumer ica 

Numerica 

Numerica 

Numerica 

Numerica 

Numerica 

AWanumerica 

Numerica 

Numerica 

1/31 G6 01 

1/12 MM 03 

1800/2400 AAAA 1980 

1/24 HH.MM 08.30 

12/-12 -1 

20/-20 GG.PP -15.10 

0/65 GG.PP 37.30 
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CUSPIDI DELLE CASE S 

ECONDO KOCK 


TEMPO SIDERALE LOCALE 

19h 43m 4s 

i 

ASCENDENTE 15G 48P 

TORO 

11 

14G IIP 

GEMELLI 

ni 

5 G 3SP 

CANCRO 

IU 

IH. CIELO 23G 53P 

CANCRO 

u 

25G 29P 

LEONE 

u i 

6 G 53P 

BILANCIA 

UII 

DISCENDENTE 15G 48P 

SCORPIONE 

UIII 

14G IIP 

SAGITTARIO 

IX 

5 G 38P 

CAPRICORNO 

X 

MEDIO CIELO 23G 53P 

CAPRICORNO 

X I 

25G 29P 

ACQUARIO 

XII 

6 G 53P 

ARIETE 


PREMI UN TASTO PER C 

ONTINUARE 




OROSC 

OPO 


DATI ANAGRAFIC 

I DEL SOGGETTO 

NOME 

E COGNOME . . ? 


GIORNO NASCITA 


MESE 

NASCITA . 


ANNO 

NASCITA . 


ORA N 

ASC ITA . 


DIFFERENZA DA GREENWIC 

H . . 

LUOGO 

DI NASCITA . 


Lungi 

TUOI NE EST . . 


LATIT 

UDINE NORD .. 



I nove input iniziali contengono i dati anagrafici. Le cuspidi nel sistema di domificazione Kock. 
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TAVOLA A - ORE LEGALI IN ITALIA 

ano 

MESE 

GIORNO 

ORA 

MESE FINE 

GIORNO ORA 

ano 

MESE 

GIORNO 

ORA 

MESE FINE 

GIORNO 

ORA 


INIZIO 







INIZIO 






1920 

MARZO 

21 

00 

SETTEMBRE 

18 

24 

1971 

MAGGIO 

23 

00 

SETTEMBRE 

25 

24 

1940 

GIUGNO 

15 

00 

DICEMBRE 

31 

24 

1972 

MAGGIO 

28 

00 

SETTEMBRE 

30 

24 

1941 

GEWAIO 

01 

00 

DICEMBRE 

31 

24 

1973 

GIUGNO 

03 

00 

SETTEMBRE 

29 

24 

1942 

GENNAIO 

01 

00 

NOVEMBRE 

02 

03 

1974 

MAGGIO 

26 

00 

SETTEMBRE 

28 

24 

1943 

MRZO 

29 

02 

OTTOBRE 

04 

03 

1975 

MAGGIO 

25 

00 

SETTEMBRE 

27 

24 

1944 

APRILE 

03 

02 

OTTOBRE 

02 

03 

1976 

MAGGIO 

30 

00 

SETTEMBRE 

25 

24 

1945 

APRILE 

02 

02 

SETTEMBRE 

16 

24 

1977 

MAGGIO 

29 

00 

SETTEMBRE 

25 

24 

1946 

MARZO 

17 

02 

OTTOBRE 

06 

03 

1978 

MAGGIO 

28 

00 

OTTOBRE 

01 

01 

1947 

MRZO 

16 

00 

OTTOBRE 

05 

01 

1979 

MAGGIO 

27 

00 

SETTEMBRE 

30 

01 

1948 

FEBBRAIO 

29 

00 

OTTOBRE 

03 

03 

1980 

APRILE 

06 

00 

SETTEMBRE 

28 

03 

1966 

MGGIO 

22 

00 

SETTEMBRE 

24 

24 

1981 

MARZO 

29 

02 

SETTEMBRE 

27 

03 

1967 

MAGGIO 

28 

00 

SETTEMBRE 

23 

24 

1982 

MRZO 

28 

02 

SETTEMBRE 

26 

03 

1968 

MAGGIO 

26 

00 

SETTEMBRE 

21 

24 

1983 

MARZO 

29 

03 

SETTEMBRE 

24 

03 

1969 

GIUGNO 

01 

00 

SETTEMBRE 

27 

24 

1984 

MARZO 

25 

03 

SETTEMBRE 

30 

03 

1970 

MAGGIO 

31 

00 

SETTEMBRE 

26 

24 











TAVOLA B 

- FUSI ORARI (differenza da Greenwich) 



STATO 

FUSO 

STATO 

FUSO 

STATO 

FUSO 

STATO FUSO 

ALGERIA 

0 

COSTA D'AVORIO 

0 

AUSTRALIA OCC. 

-8 

CINA -8 

GRAN BRETAGNA 

0 

IRLANDA 

0 

FILIPPINE 

-8 

HONG KONG -8 

ISLANDA 

0 

MAROCCO 

0 

FORMOSA 

-8 


EURITMIA 

0 

PORTOGALLO 

0 




TOGO 

0 

ALTO VOLTA 

0 








COREA 

-9 

GIAPPONE -9 

ALBANIA 

-1 

ANDORRA 

-1 




ANGOLA 

-1 

AUSTRIA 

-1 

AUSTRALIA ORIEN. 

-10 


BELGIO 

-1 

CAMERUN 

-1 




CECOSLOVACCHIA 

-1 

CENTRO AFRICA 

-1 




cmo 

-1 

CONGO 

-1 

ARGENTINA 

+3 

BRASILE ORIEN. 43 

OMIMRCA 

-1 

FRANCIA 

-1 

OWDA ORIEN. 

♦3 

URUGUAY 43 

GABON 

-1 

GERMANIA 

-1 




GIBILTERRA 

-1 

ITALIA 

-1 




JUGOSLAVIA 

*1 

LUSSEMBURGO 

-1 

BOLIVIA 

+4 

BRASILE CENTR. 44 

MALTA 

-1 

MONACO 

-1 

PARAGUAY 

+4 

PORTORICO 44 

NORVEGIA 

-1 

OLANDA 

-1 

VENEZUELA 

♦ 4 


POLONIA 

-1 

SPAGNA 

-1 




SVEZIA 

-1 

SVIZZERA 

-1 








BRASILE OCC. 

♦5 

COLOMBIA 45 





CUBA 

+5 

GIAMAICA 45 

BULGARIA 

-2 

CIPRO 

-2 

PERÙ' 

+5 


EGITTO 

-2 

FINLANDIA 

-2 




GIORDANIA 

-2 

GRECIA 

-2 




ISRAELE 

-2 

LIBANO 

-2 

CANADA CENTR. 

+6 


LIBIA 

-2 

ROMANIA 

-2 




SIRIA 

-2 

SUD AFRICA 

-2 




SUDAN 

-2 

TURCHIA 

-2 

CANADA OCC. 

48 


ARABIA SAUDITA 

-3 

ETIOPIA 

-3 

U.R.S.S. OCC. 

-3 

U.R.S.S. ORIEN. -13 

IRAN 

-3 

IRAQ 

-3 




KENYA 

-3 

KULJAIT 

-3 




QATAR 

-3 

SOMALIA 

-3 

U.S.A ORIEN. 

45 

U.S.A. OCC. 411 

INDIA 

-6 

SRY LANKA 

-6 

N.B. : Se al momento della nascita era in vigore l'ora 





legale (vedi TAVOLA A), 

bisogna digitare -2 anzich-e -1. 


I 


44 










































SAGITTARIE^ 


Figurai. Questo 
grafico porta già 
prestampati i dodici 
segni zodiacali; a 
voi tracciarvi le 
cuspidi, in modo da 
realizzare la carta 
del cielo natale. 


zione planetaria al momento della na¬ 
scita. 

Le case sono numerate da I a XII a 
partire dall’Ascendente che è la cuspi¬ 
de della prima casa. A ciascuna di que¬ 
ste divisioni si attribuisce un significa¬ 
to particolare, schematicamente spie¬ 
gato nella tavola D. 

Il passo successivo è quello del cal¬ 
colo, e quindi della rispettiva visualiz¬ 
zazione, della posizione dei dieci Pia¬ 


neti, anch’essa espressa in Gradi e Pri¬ 
mi. C’è da specificare che, a volte, alla 
fine della stringa riportante la posizio¬ 
ne può apparire la lettera R. Ciò signi¬ 
fica che, in quella particolare data, il 
pianeta si trovava in moto apparente¬ 
mente RETROGRADO; sembrava 
cioè che stesse tornando indietro. 


SCORPIO 


Chiunque abbia un minimo di dimesti¬ 
chezza con l’astronomia sa che ciò è 
impossibile, ma astrologicamente si 
indica come RETROGRADO quel 
pianeta il cui moto è "apparentemente 
e temporaneamente contrario a quello 
ordinario" (Ciro Discepolo, Guida al- 
P astrologia). 




POSIZIONI 

PLANETARIE 

SOLE 

11G 59P 

PESCI 

LUNA 

27G 36P 

SAGITTARIO 

MERCURIO 

26G 2 1P 

PESCI 

UE NERE 

8 G 29F 

ARIETE 

MARTE 

9 G 42P 

GEMELLI 

GIOUE 

1 G 39P 

SAGITTARIO 

SATURNO 

5 G 33P 

CAPRICORNO 

URANO 

13G 8 P 

LEONE R 

NETTUNO 

6 G 45P 

SCORPIONE R 

PLUTONE 

2 G 4 1P 

UERGINE R 

PREMI 

UN TASTO 

PER CONTINUARE 



c 

IJ S RIDI DELLE 

CASI 

E SEC 

ONDO PLACIDUS 


TEMPO SIDERALE LOCALE 

: 19h 43r«i 4s 

I 

ASCENDENTE 

15G 

48P 

TORO 

I I 


13G 

42P 

GEMELLI 

I 11 


4 G 

4 P 

CANCRO 

i u 

IM. CIELO 

23 G 

53P 

CANCRO 

u 


17G 

46P 

LEONE 

U I 


23 G 

25P 

UERGINE 

U11 

DISCENDENTE 

15G 

48P 

SCORPIONE 

u 111 


13G 

42P 

SAGITTARIO 

IX 


4 G 

4 P 

CAPRICORNO 

X 

MEDIO CIELO 

23 G 

53P 

CAPRICORNO 

I 


17G 

46 P 

ACQUARIO 

XII 


23 G 

25 P 

PESCI 


PREMI UN TA 

STO 1 

PER C 

:ONT INUARE 


Le cuspidi nel sistema di domificazione Placidus. Le coordinate necessarie per il disegno dei pianeti. 
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due pianeti misurata in gradi. Tutte le 
scuole di astrologia attribuiscono agli 
aspetti una grande importanza in 
quanto costituiscono il punto fonda- 
mentale per una corretta interpreta¬ 
zione. OROSCOPO tiene conto dei 
cinque aspetti più importanti, ricono¬ 
sciuti come tali dalla stragrande mag¬ 
gioranza degli astrologi. 

È possibile uscire dal programma in 
qualsiasi momento premendo il tasto 
[+]• 


Se la parte relativa ai calcoli è quan¬ 
to di più serio e scientifico si possa 
chiedere, la parte che riguarda l’inter¬ 
pretazione merita una precisazione. 
L’interpretazione fornita dal pro¬ 
gramma OROSCOPO tiene conto so¬ 
lo ed esclusivamente della posizione 
dei pianeti nei segni. Qualche astrolo¬ 
go o appassionato di astrologia po¬ 
trebbe obiettare che è molto poco. È 
chiaro infatti che questo programma 


confrontata con quella fornita dalle ri¬ 
viste non specializzate. 

L’ultima sezione offerta dal pro¬ 
gramma OROSCOPO permette di 
stampare un tabulato riportante tutto 
ciò che è stato visualizzato sul moni¬ 
tor. 

Per disegnare la carta del cielo nata¬ 
le, poi, dovete procurarvi dei fogli co¬ 
me quello raffigurato (figura 1), repe¬ 
ribili in alcune librerie specializzate 
(ma qualche fotocopia va benone) e 
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PROGRAMMI 
HARDWARE 4» 
E ACCESSORI 



Nuova 
edizione 
aggiornata 
e ampliata 


e 

sono un 
supplemento di Applicando, il 
mensile per i personal computer 
Apple. Acquistarle singolarmente 
costa 18.000 lire. Per chi si abbona 
ad Applicando sono in regalo. 


o 50.000 lire per ricevere 10 numeri di Applicando e in regalo l’edizione 1985*86 di 

Le pagine del Software e dell’Hardware per Apple 


COGNOME E NOME . 

VIA. ‘. N. 


Stai per acquistare un 
personal computer Apple? 

Vorrai sapere che cosa puoi far¬ 
ci. Questo volume è un aiuto indi¬ 
spensabile, una guida ragionata 
e completa di tutti i programmi, 
l’hardware e gli accessori dispo¬ 
nibili in Italia. Prima di fare il tuo 
acquisto non puoi non consultar¬ 
lo, perché solo se avrai a disposi¬ 
zione il programma, o i program¬ 
mi, e le periferiche che ti interes¬ 
sano, la tua scelta non ti lascerà 
deluso. 


Hai appena acquistato un 
personal computer Apple? 

Senza questa raccolta di pro¬ 
grammi e le numerosissime se¬ 
gnalazioni di periferiche hardwa¬ 
re e di accessori non potrai mai 
sapere quali e quanti utilizzi po¬ 
trai farne. 


Possiedi già da tempo un 
personal computer Apple? 

Allora non c’è bisogno di dirti 
quanto può essere prezioso que¬ 
sto libro: sai già che il tuo compu¬ 
ter, senza programmi e senza un 
hardware adeguato, è come 
un’auto senza benzina e senza 
le ruote. E poiché non c’è limite 
alla fantasia e all’inventiva, con¬ 
sultando questa guida scoprirai 
utilizzi impensati per il tuo perso¬ 
nal. Utilizzi che ti permetteranno 
nel lavoro, nel tempo libero, nel 
gioco o nello studio, di essere 
sempre il più aggiornato, il più 
organizzato, il più soddisfatto... 


In questa nuovissima edizione 
delle Pagine del Software per 
Apple trovi elencati, con una ap¬ 
profondita descrizione, tutti i pro¬ 
grammi e le periferiche hardware 
disponibili in Italia. 


Desidero ricevere, senza aggravio di spese postali, Le Pagine del Software , con la seguente formula (segnare la casella 
di proprio interesse): 


□ 18.000 lire per ricevere l’edizione 1985-86 di 

Le pagine del Software e dell’Hardware per Apple 



Ritagliar», compilar» • 
spedire»: Edltronica Srl, 
Corso Monfort» 39, 

20122 Milano. 


CAP. CITTÀ. PR0V. 

□ Allego assegno non trasferibile di L. intestato a Edltronica Srl. 

□ Allego ricevuta di versamento di L sul CC postale N 19740208 intestato a Editronica Srl 

Corso Monforte 39, 20122 Milano. 

□ Pago fin d'ora con la mia carta di credito Bankamericard N 

Data.Firma 


scadenza 









































TAVOLA C - LONGITUDINI E LATITUDINI 


PROV. 

LONG. 

LAT. 

PROV. 

LONG. 

LAT. 

PROV. 

LONG. 

LAT. 

PROV. 

LONG. 

LAT. 

AG 

-13.3 

37.2 

MS 

-10 

44.05 

CR 

-10 

45.08 

SA 

-14.55 

40.4 

AL 

-8.3 

44.05 

MT 

-16.3 

40.4 

CS 

-16.15 

39.15 

SI 

-11.15 

43.2 

AN 

-13.3 

43.35 

NA 

-14.15 

40.5 

CT 

-15 

37.30 

SO 

- 9.45 

46.1 

AO 

- 7.15 

45.45 

NO 

i 

co 

co 

45.3 

CZ 

-16.3 

38.55 

SP 

- 9.45 

44.05 

AP 

-13.3 

42.5 

NU 

- 9.15 

40.2 

EN 

-14.15 

37.35 

SR 

-15.15 

37.05 

AQ 

-13.15 

42.2 

PA 

-13.15 

38.1 

FE 

-11.3 

44.5 

SS 

- 8.3 

40.45 

AR 

-11.45 

43.3 

PC 

- 9.3 

45.05 

FG 

-15.3 

41.3 

SV 

- 8.15 

44.2 

AT 

- 8 

44.55 

PD 

-11.45 

45.25 

FI 

-11.15 

43.45 

TA 

-17.15 

40.3 

AV 

-14.45 

40.55 

PE 

-14 

42.3 

FO 

-12 

44.15 

TE 

-13.3 

42.4 

BA 

-16.45 

41.1 

PG 

-12.15 

43.05 

FR 

-13.15 

41.4 

TN 

-11 

46.05 

BG 

- 9.3 

45.4 

PI 

-10.15 

43.45 

GE 

-8.45 

44.25 

TO 

- 7.3 

45.05 

BL 

-12 

46.1 

PN 

-12.3 

45.55 

GO 

-13.3 

45.55 

TP 

-12.3 

38 

BN 

-14.45 

41.1 

PR 

-10.15 

44.5 

GR 

-11 

42.25 

TR 

-12.3 

42.35 

BO 

-11.15 

44.3 

PS 

-12.45 

43.55 

IM 

- 8 

43.55 

TS 

-13.45 

45.4 

BR 

-17.45 

40.4 

PT 

-10.45 

43.55 

IS 

-14.15 

41.3 

TV 

-12.15 

45.4 

BS 

-10 

45.3 

PV 

- 9 

45.1 

LE 

-18.15 

40.2 

UD 

-13 

46.05 

BZ 

-11.15 

46.3 

PZ 

-15.45 

40.4 

LI 

-10.15 

43.3 

VA 

- 8.45 

45.5 

CA 

- ? 

39.15 

RA 

-12 

44.24 

LT 

-12.45 

41.3 

ve 

- 8.15 

45.2 

CB 

-14.3 

41.35 

RC 

-15.3 

38.05 

LU 

-10.3 

43.5 

VE 

-12.15 

45.25 

CE 

-14.15 

41.1 

RE 

-10.3 

44.4 

MC 

-13.15 

43.2 

VI 

-11.3 

45.3 

CH 

-14 

42.2 

RG 

-14.55 

36.55 

ME 

-15.3 

38.1 

VR 

-11 

45.27 

CL 

-14 

37.3 

RI 

-12.45 

42.25 

MI 

- 9 

45.3 

VT 

-12 

45.25 

CN 

- 7.3 

44.25 

RO 

-11.45 

45.05 

m 

-10.45 

45.1 

MO 

-10.45 

44.4 

CO 

- 9 

45.3 

ROMA 

-12.15 

41.55 








N. CASA 

TAVOLA D 

DENOMINAZIONE 

- DESCRIZIONE CASE 

CORRISPONDENZE 

1 

Ascendente 

Esteriorit<. Personal iti. 

II 


Situazione finanziaria. Denaro. 

III 


Studi. Parenti prossimi. 

IV 

Imum Coeli 

Faraiglia d'origine. 

V 


Svaghi. Sessualità Procreazione. 

VI 


Salute. Lavoro. Quotidianitl. 

VII 

Discendente 

Matrimonio. Associazioni. Contratti 

Vili 


Erediti. Morte. 

IX 


Viaggi all'estero. 

X 

Medio Cielo 

Realizzazione. Emancipazione. 

XI 


Amici. Protezioni. Equilibrio. 

XII 


Prove. Malattie. Vecchiaia. 


TAVOLA E - TOLLERANZE E SIGNIFICATO DEGLI ASPETTI 

ASPETTO 

GRADI 

TOLLERANZA 

VALORE 

Congiunzione 

0 

♦-10I 

POS/NEG 

Sestile 

60 

4- 4[ 

POS 

Quadrato 

90 

4- 61 

NEG 

Trigono 

120 

4- 81 

POS 

Opposizione 

180 

4—10 C 

NEG 


INTERPRETAZIONE 


MENERE 


IN 


ARIETE 


DETERMINA UNA INDOLE PASSIONALE NON SEM¬ 
PRE COSTANTE NEI SENTIMENTI NUMEROSE AV¬ 
VENTURE PASSEGGERE. SOGGETTO POCO ADATTO 
A RUOLI DI SUBALTERNO. ESTREMA AMBIZIONE 
E VOLONTÀ' OTTIMO MEDICO.PREDISPOSIZIONE 
ALLA CARRIERA MILITARE. 


PREMI UN TASTO PER CONTINUARE 


INTERPRETAZIONE 


SOLE 


IN 


PESCI 


DETERMINA INTUITIVITÀ' EMOTIVITÀ' E SEN¬ 
SIBILITÀ'. IL SOGGETTO SARA'PORTATO VERSO 
LE ARTI E LE SPECULAZIONI INTELLETTUALI. 
LA VOLyNTA SARA' INSTABILE E LA FIDUCIA 

MODeIt I T | S LE IpHÌ°ELEUftTÌ: 1 CUADflGHI 


PREMI UN TASTO PER CONTINUARE 


Nella fase di interpretazione il programma presenta un’analisi minuziosa, per pianeta, delle caratteristiche del soggetto. 
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quattro pennarelli: verde, rosso, blu e 
nero. Per imparare a realizzare perfet¬ 
tamente il disegno, vi proponiamo un 
grafico di prova (figura 2). 


Soggetto : Josè Milazzo, Nata ad 
Acireale (CT), il 20.6.1953, h. 5.35. 

La prima operazione da compiere è 
quella di tracciare sul foglio le cuspidi 


SE LO LISTATE 



Le righe principali del listato sono elencate qui di seguito, a disposizio¬ 
ne dei volenterosi che volessero “mettervi mano”. 

Riga 20 Salta le principali subroutine. 

Righe 30,60 Standardizza la lunghezza delle stringhe PI$ (Pianeti) in fase 
di calcolo degli aspetti. 

Riga 70 Intervalli minimi e massimi nel confronto degli aspetti. 

Riga 80 Aspetti. 

Righe 90,100 Variabili di servizio nella routine interpretazione. 

Riga 110 Intestazione videata aspetti. 

Righe 120,240 Conversione SEGNI-PRIMI. 

Righe 250,300 Sub nel calcolo delle case. 

Righe 310,360 Standardizzano la lunghezza delle stringhe YL$ (Case) in 
fase di calcolo delle case. 

Righe 510,610 Lettura file interpretazione. 

Righe 650,800 Sub confronti nel calcolo degli aspetti. 

Righe 810,940 Sub conversione stringhe SZ$ (I) nella routine interpreta¬ 
zione. 

Righe 970,980 Dimensionamento vettori. 

Riga 990 Valore di PI greco. 

Righe 1000,1070 Definizione delle funzioni usate. 

Righe 1090,1190 Videata di presentazione. 

Righe 1200,1370 Input dati. 

Righe 1460,1650 Calcolo Tempo Siderale. 

Righe 1660,1720 Scelta domificazione. 

Righe 1730,2230 Calcolo pianeti. 

Riga 2240 Visualizzazione pianeti. 

Riga 2250 Conversione in stringa dei gradi e primi (GD$ e PM$) dei 
pianeti. 

Riga 2260 Conversione in stringa dei gradi e primi (GD$ e PM$) dell’A¬ 
scendente e del Medio C. 

Riga 2270 Conversione in primi (KK (I)) assoluti delle posizioni dei 
pianeti e dell’Ascendente e del Medio Cielo. Righe 2290,2310 Videata di 
presentazione nel calcolo delle case secondo la domificazione KOCH. 
Righe 2320,2560 Calcolo posizione case. 

Righe 2570,2580 Videata di presentazione nel calcolo delle case secondo 
la domificazone PLACIDUS. 

Righe 2590,2880 Routine calcolo posizione case. 

Righe 2890,3010 Routine calcolo aspetti. 

Righe 3090,3230 Individuazione puntatori per la lettura del file INTER¬ 
PRETAZIONE. 

Righe 3240,3300 Visualizzazione interpretazioni. 

Righe 3310,3370 Opzione stampa su carta dei dati. 

Righe 3380,3660 Routine di stampa. 

Righe 3670,3720 Opzione fine/inizio programma. pemini 

Righe 3730,3890 Data. 



LIBRA 



PISCES 


delle case. Prendete i dati dal tabulato 
nella sezione DOMIFICAZIONE, e 
procedete come segue. 

1. Segnate con il pennarello verde 
un punto in corrispondenza di 10° del 
segno del CANCRO, un altro a 1° del 
segno del LEONE, un altro a 23° del 
segno del LEONE, e così via fino a 
segnare tutti i dodici punti risultanti 
dal calcolo della domificazione. Fatto 
questo, unite i punti opposti con una 
linea retta. Alla fine di questa opera¬ 
zione, se eseguita correttamente, il 
grafico sarà diviso in dodici settori o 
CASE. Segnate all’interno del cerchio 
piccolo al centro del foglio, a partire 
dalla cuspide dell’Ascendente, i nu¬ 
meri corrispondenti alla CASA. 

2. Disegnate con il pennarello nero, 
nella loro giusta posizione, i PIANE¬ 
TI, prendendo le coordinate dalla se¬ 
zione POSIZIONI PLANETARIE 
del tabulato (per i simboli dei pianeti 
potete consultare la parte finale di 
questa spiegazione). 

3. Leggete la prima riga nella sezio¬ 
ne ASPETTI del grafico, e tracciate 
una linea che congiunga il SOLE con 
NETTUNO. Se l’aspetto è positivo la 
linea sarà tracciata con il pennarello 
blu (come in questo caso), se, al con¬ 
trario, l’aspetto è negativo, la linea 
sarà tracciata con il pennarello rosso. 
Proseguite in questo modo per tutti gli 
aspetti. 

La carta del cielo natale appena di¬ 
segnata non è altro, quindi, che la rap¬ 
presentazione grafica dei complessi 
calcoli eseguiti per mezzo del pro¬ 
gramma OROSCOPO. Se un giorno 
decideste di chiedere un consulto a un 
astrologo, non scordate di portare la 
carta da voi disegnata. Gli risparmie¬ 
rete una buona mezz’ora di lavoro, 
che in questo caso, potrà essere dedi¬ 
cata all’interpretazione. E con le tarif¬ 
fe in atto non è poco. 

Maurizio Mangano 


Di questo programma Appli¬ 
cando non pubblica il listato, 
ma offre il dischetto che con¬ 
tiene anche il programma 
Voce, a un prezzo molto con¬ 
tenuto (30.000 lire) compren¬ 
sivo di spese di spedizione 
per raccomandata. Le istru¬ 
zioni per il funzionamento 
dei programmi sono regi¬ 
strate nel dischetto stesso. 
Per ordinarlo, utilizzate il 
buono contenuto del Disk 
Service. 


i 


X 


"il 
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Tutto è sopportabile, ma non che un improvviso black out 
nullifichi ore e ore di paziente e prezioso lavoro 
all’elaboratore. La tensione non deve venire mai a 
mancare: basta una frazione di secondo perché accada 
l’irreparabile. Le soluzioni, per una corretta prevenzione, 
ci sono, e si chiamano stabilizzatori, separatori di rete, 
gruppi di continuità. 


La rete è stabile? 


//| In personal sulla scrivania di 
ogni colletto bianco" era la fi¬ 
losofia di Steve Jobs. Non c’è proprio 
riuscito, ma sono in moltissimi oggi 
che hanno accettato un elaboratore 
personale come normale strumento di 
lavoro, e come tale va salvaguardato 
in tutto e per tutto. A prescindere dal¬ 
le normali precauzioni che un utente 
dovrebbe prendere (back up dei dati, 
pulizia e mantenimento dei sistemi), 
c’è sempre la possibilità di sbalzi di 
tensione o di improvvisi black out a 
danno di questi sistemi. È noto infatti 
che ogni calcolatore, grande o piccolo 
che sia, ha necessità di essere alimen¬ 
tato dalla rete di distribuzione dell’e¬ 
nergia elettrica. Normalmente la rete 
ENEL è in grado di fornire una tensio¬ 
ne alternata di 220 V a una frequenza 
di 50 Hz, atta ad alimentare sufficien¬ 
temente la gran parte delle apparec¬ 
chiature usate quotidianamente. 

E però indiscutibile che l’alimenta¬ 
zione di un computer deve rimanere 
stabile (sia in tensione sia in corrente) 
ed esente da disturbi, data la notevole 
complessità circuitale di questa mac¬ 
china. La tensione, che determina l’ef¬ 
ficienza dell’alimentatore, non deve 
assolutamente venire a mancare nep¬ 
pure per un ciclo di rete; un incidente 
del genere, infatti, sarebbe sufficiente 
a cancellare la memoria a semicondut¬ 
tori interna al calcolatore, oppure a 
danneggiare l’operazione di lettu¬ 
ra-scrittura del disco (sia esso floppy 
o hard disk). 

La frequenza è altresì importante in 
quanto contribuisce a rendere stabile 
la velocità a cui vengono fatti girare i 
dischi, e specialmente quelli ad alta 
densità di informazioni; poiché molti 
di questi sono sincronizzati con la fre¬ 
quenza di rete e non accettano varia¬ 
zioni di frequenza al di fuori di ± 50 


PPM, si potrebbero manifestare i co¬ 
siddetti fenomeni di "jitter" che cause¬ 
rebbero errori durante la lettura o la 
scrittura nelle memorie di massa. 

Le cause che normalmente possono 
indurre anomalie in un calcolatore per 
effetto della tensione di rete possono 
essere molteplici. Utilizzando il calco¬ 
latore per elaborare dati o per svilup¬ 
pare programmi, molte volte si corre il 
rischio di perdere quanto era prece¬ 
dentemente in memoria a causa di in¬ 
terruzioni anche minime della rete 
elettrica, anche a livello di qualche ci¬ 
clo; questo inconveniente si è incon¬ 
trato maggiormente nel periodo esti¬ 
vo, quando scariche sulla rete di distri¬ 
buzione (fulmini) provocano interru¬ 
zioni, oppure quando, sulla rete già 
sovraccarica, vengono allacciate mac¬ 
chine di notevole potenza con conse¬ 
guente soppressione di alcuni cicli. 

Oltre alla già accennata mancanza 
di rete, le sorgenti di disturbi in linea 


possono essere tensioni anomale pro¬ 
vocate da scariche elettrostatiche, 
macchine industriali con forti spunti o 
con continue variazioni dell’assorbi¬ 
mento di corrente (forni, frigoriferi), 
oppure i circuiti di variazione di velo¬ 
cità dei motori (macchine utensili). 

Si è cercato quindi, con l’andare del 
tempo, di diversificare fra loro questi 
fenomeni offrendo al mercato diverse 
soluzioni ai vari tipi di problemi inte¬ 
grando il sistema di calcolo con stabi¬ 
lizzatori, separatori di rete e infine 
gruppi di continuità. 

Stabilizzatori 

Lo stabilizzatore è un sistema in gra¬ 
do di correggere l’ampiezza della ten¬ 
sione presente al suo ingresso, sia essa 
superiore o inferiore alla tensione no¬ 
minale di 220 V. Esistono principal¬ 
mente due tipi di stabilizzatore: il pri- 


SOLUZIONI CON STABILIZZATORI E SEPARATORI DI RETE 


Tensione 

variabile 


Tensione 
variabile 
e inquinata 



■■■■■■■■■■■■ 
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mo è elettromeccanico e consente di 
ottenere in uscita una forma d’onda 
priva di deformazioni con un sistema 
che offre una grande affidabilità. 


Sarà utilizzato dove ci siano varia¬ 
zioni lente della tensione di rete oppu¬ 
re nei casi in cui la rete normalmente 
sia sovrabbondate o insufficiente (per 


esempio: diversa lontananza da una 
cabina Enel). 

Nel caso ci siano però variazioni 
molto veloci della tensione di rete, co¬ 
me per esempio può accadere in vici¬ 
nanza di industrie dove ci siano inser¬ 
zioni e disinserzioni di carichi di note¬ 
vole potenza, c’è la necessità di usare 
stabilizzatori con capacità maggiori di 
recupero in termini di velocità; essi 
sono completamente a stato solido, ed 
eliminano quindi le inerzie meccani¬ 
che del tipo precedente. 

Nel caso in cui in rete ci siano inter¬ 
ferenze dovute a scariche elettrostati¬ 
che o alla, vicinanza di impianti che 
usano variatori di velocità per motori, 
oppure ci sia la necessità di separare 
galvanicamente il calcolatore dalla re¬ 
te per avere più sicurezza all’operato¬ 
re, è opportuno usare un trasformato- 
re separatore (serie TSR), che elimina 
la possibilità che fra neutro e terra si 
formi una differenza di potenziale 
molto alta; questa infatti potrebbe es¬ 
sere causa di malfunzionamento del 


SOLUZIONE CON GRUPPI DI CONTINUITÀ STATICI MONOFASE 


Tensione 

variabile 

Frequenza 

variabile 

Brevi e 

continuative 

interruzioni 


STEPCONTROL 100VA 


250VA 



400VA 
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Fotostudio ZANETTE-Sacile 


GRUPPI DI 
CONTINUITÀ' STATICI 
NO BREAK 


L’esigenza di disporre di una fonte 
energetica continuativa, indipendente 
anche per un considerevole tempo dalla 
rete di distribuzione, con sufficiente 
autonomia, ha creato la necessità di 
realizzare un tipo di macchina in grado 
di fornire energia molto stabile in 
tensione e frequenza con distorsione 
molto bassa, sia in presenza della rete o 
meno. 

Impiegando questi gruppi di continuità 
per alimentare calcolatori, macchine 
contabili ed altri sistemi con memoria 



voltatile, si elimina ogni tipo di 



Uscita sinusoidale 
220V ± 1,5% 
distorsione 3% 

50 Hz ± 0,03%. 
Rete annessa 
220V t 10%. 
Batterie ermetiche 
o stazionarie. 
Potenze da 100 W 
a 5 kW. 


inconveniente causato dalla mancanza 
di rete, fornendo alimentazione in 
continuità senza alcuna commutazione. 
Inoltre questi gruppi di continuità si 
comportano anche da separatori di rete, 
e sopprimono eventuali disturbi e 
transitori. 


STATICONTROL 70 




STEPCONTROL 400 


STEPCONTROL 250 


ITllCRDSET® 


ENERGIA E CONTROLLO 


SACILE ■ PN ■ ITALY 

VIA A. PERUCH, 64 
TEL. 0434 - 72459 
TELEX 450405 


CERCASI AGENTI 
PER ZONE LIBERf 


PRODUCIAMO INOLTRE: STABILIZZATORI DI TENSIONE, FILTRI E SEPARATORI DI RETE. 









Tutti i principali dati per identificare e scegliere il modello 



DIGITEK 

Via Valli 28 
Bagnolo in Piano (RE) 

ELCAM 

V. Volpedo 8 
Milano 

ELETTRA 

Via Ponti 48 
Milano 

MEDEL 

V. Cerretti 55 
Roma 

MICROSET 

Via A Peruch 64 

Sacile (PN) 

PERTEL 

Via Grmea 99 

Torino 

Modello 

GR 200 

XT 701 

MINI UPS 
SOLA 

EL 2Ò0 

MINIBREAK 

300 

STEPCI 

250 

DNTR0L 

400 

M0D 65W 

M0D 180W 

Dimensioni 

22x 1 8 x 21 

1 8 x 40 x 36 

30 x 48 x 26 

30 x 37 x 15 

40 x 70 x 26 

42 x 28 x 39 

40x 70x 26 

11 x 31 x 22 

11 x 31 x 22 

Peso in Kg 

6,6 

7 

61 

16 

70 

13,5 

60 

6,5 


Tensione 
entrata V 

220 

220 

220 +10* 

220 +10* 

220 +15* 

220 +10* 

220 ^10* 

220 +10* 

220 +10* 

Tensione 

batteria V 

12 

24 

24 

12 

24 

24 

24 

12 

24 

Tensione 
uscita V 

220 

220+4* 

220 +3* 

220_+5* 

220 _+2* 

220 +3* 

220 +3* 

220 +10* 

220 +10* 

Numero 

uscite 

1 

2 

(indipendenti) 

2 

(in parallelo) 

1 

2 

(in parallelo) 

1 

1 

1 

1 

Potenza W 
uscita 1 

220 

450 

600 

220 

300 

250 

400 

200 

180 

Potenza W 
uscita 2 


200 






Tempo di 
intervento 

5-10 ms 

nullo 

nullo 

6 ms 

nullo 

nullo 

nullo 

4 ms 

4 ms 

Autonomia 

180 min. 

180 min. 

15 min. 

30 min. 

60 min. 

20 min. 

25 min. 

55 min. 

20 min. 

Batteria 

Ampère/h 

35/40 

35/40 

nc 

nc 

55 

24 

24 

40 

40 

Prezzo 

420.000 

1 880.000 

3.600.000 

nc 

1.500.000 

1.300.000 

2.020.000 

684000 

858.000 


sistema di calcolo. 

È da notare che la coppia separatore 
di rete—stabilizzatore risulta un siste¬ 
ma molto efficace per la soppressione 
di disturbi in linea. 

Gruppi di 
continuità 

I gruppi di continuità invece, oltre 
ad avere le già citate qualità dei sepa¬ 
ratori e degli stabilizzatori, possono 
impedire che manchi, anche per una 
piccola frazione di ciclo, la tensione. 
Sono infatti macchine capaci di fornire 
una tensione stabile in uscita, sia come 
ampiezza sia come frequenza. 

La parte fondamentale, cioè quella 
che determina le principali caratteri¬ 
stiche del gruppo di continuità (stabili¬ 
tà, potenza e distorsione) è costituita 
dall’inverter, il quale provvede a rica¬ 
vare una tensione alternata da una 
continua. Esso è sempre in funzione e 
normalmente viene alimentato dalla 
rete opportunamente ridotta e rad¬ 


drizzata, ma quando questa viene a 
mancare le batterie provvedono ad ali¬ 
mentare l’inverter; questo tipo di fun¬ 
zionamento viene chiamato "no break" 
in quanto è l’inverter che in qualsiasi 
modo di funzionamento (rete o batte¬ 
rie) , provvede ad alimentare il calcola¬ 
tore. È il tipo di inverter quindi a de¬ 
terminare la bontà della forma d’onda 
in uscita (distorsione). 

L’inverter più semplice è quello che 
in uscita fornisce una forma d’onda 
quadra, ha impiegi limitati come luci 
d’emergenza e circuiti che non abbiso¬ 
gnano di una tensione perfettamente 
sinusoidale. Una elaborazione del tipo 
precedente di inverter è quella che ri¬ 
costruisce la sinusoide per gradini fil¬ 
trando in modo passa-basso. 

Diventa molto importante in questo 
caso l’azione del filtro di uscita del 
gruppo. Per eliminare questo inconve¬ 
niente e per rendere quindi la sinusoi¬ 
de a sempre più bassa distorsione, l’in- 
verter viene fatto lavorare a modula¬ 
zione di larghezza d’impulso: la sinu¬ 
soide in questo caso presenta una di¬ 
storsione minore del 3%. 


Questo tipo di tecnologia, detta 
PWM, cioè modulazione ad alta fre¬ 
quenza, permette di ottenere anche un 
elevato rendimento del sistema, sfrut¬ 
tando quindi molto le capacità delle 
batterie in tampone. Anche i circuiti di 
controllo degli inverter assumono 
un’importanza notevole, in quanto de¬ 
vono provvedere a generare una fre¬ 
quenza di 50 Hz che deve ovviamente 
rimanere stabile. I componenti usati, 
quindi, devono essere di buona qualità 
e la soluzione migliore è quella di usa¬ 
re un quarzo per ottenere una buona 
stabilità (± 3- PPM). 

La logica di controllo deve anche 
provvedere a fare in modo che la ten¬ 
sione di uscita rimanga stabile e deve 
anche proteggere l’inverter da even¬ 
tuali anomalie di funzionamento come 
sovraccarichi e cortocircuiti in uscita. 
Il caricabatterie a corrente costante in¬ 
terno al gruppo provvede a mantenere 
cariche le batterie quando c’è la pre¬ 
senza della rete. 

L’impiego di componenti professio¬ 
nali, di nuove tecnologie, di circuitene 
disposte su schede intercambiabili e 
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CONTENITORE BATTERIE 

-EUttfl- 


Gruppo di continuità XT 700 
distribuito dalla Digitek. 


gruppi di potenza modulari ha contri¬ 
buito a raggiungere un elevato grado 
di affidabilità di queste macchine. 

Come scegliere 

Il mercato prevede diversi modelli, 
con caratteristiche, potenzialità, in¬ 
gombri e prezzi differenti. Per sceglie¬ 
re il sistema adatto alle proprie esigen¬ 
ze bisogna in primo luogo stabilire 
quant’è il consumo del personal e delle 
eventuali periferiche da salvaguadare. 
Per fare ciò è indispensbile un ampe¬ 
rometro per corrente alternata possi¬ 
bilmente a tenaglia. 

Si fa passare nella tenaglia il cavo 
della macchina che si vuole testare 
mentre è in funzione e si leggono sul¬ 
l’amperometro i valori d’intensità di 
corrente. Da tenere presente che al 
consumo di energia di un personal 
contribuisce essenzialmente la sua 
unità centrale, la Cpu, ma soprattutto 
le due memorie, quella permanente 
Rom, e quella operativa Ram. 

In ogni modo da un calcolo fatto da 
Applicando è emerso che un Apple//e 


assorbe da 40 a 45 watt, 95 se si aggiun¬ 
gono il monitor (30 watt) e un drive 
(15 watt). A questo bilancio devono 
poi essere sommati altri 30 watt se si 
adopera la stampante e altri 15 per il 
drive aggiuntivo. 60 watt richiede in¬ 
vece il Macintosh nella configurazioe a 
128Kb a cui se ne aggiungono 20 per il 
drive aggiuntivo e 30 per la stampante. 
Da questa analisi sommaria si può de¬ 
durre che un utente Apple o di una 
macchina con analoghe prestazioni 
debba orientarsi su gruppi di continui¬ 
tà a partire da 2-300 Watt per coprire 
l’energia assorbita dal sistema. 

Un’ultima chiave di lettura nella 
scelta del sistema è il tempo d’inter¬ 
vento. I migliori modelli prevedono 
un tempo nullo cioè 0 secondi dal mo¬ 
mento dell’interruzione di tensione 
elettrica al momento dell’entrata in 
funzione del gruppo di continuità. 
L’Apple però, prima di spegnersi, ha 
una brevissima autonomia di 8/10 mil¬ 
lisecondi; quindi, per fare un esempio, 
un sistema con un tempo d’intervento 
di 5 millisecondi farebbe in tempo a 
sostituirsi all’Enel. 

Franco Milan 
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Ogni blackout o microinterruzione dell’energia elettrica provoca l’immediata 
cancellazione di tutti i dati inseriti nella memoria del tuo computer. 

Qualche volta il danno rappresenta il lavoro di una intera giornata. 

I GRUPPI DI CONTINUITÀ DIGITEK EVITANO QUESTI COSTOSISSIMI INCONVENIENTI. 

Il gruppo di continuità DIGITEK ad onda trapezoidale stabilizzata unisce al costo 
contenuto eccellenti prestazioni e garantisce la totale eliminazione dei disturbi derivanti 
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VIA VALLI, 28 - 42011 BAGNOLO IN PIANO (Reggio Emilia) 
Tel. (0522) 61623 r.a. - Telex 530156 


La serie GCS “no stop" garantisce la totale eliminazione 
dei problemi di rete, (instabilità, microinterruzioni, 
disturbi di linea, black-out) su tutti i sistemi medio piccoli 
esistenti. 


GCS 150 

Potenza max 

i° 

convert. 

150W 

GCS 300 


i° 


300 W 

GCS 500 


i° 


500 W 

GCS 600 e XT 700 


i° 


450 W 



2° 


200 W 

GCS 1000 


1° 


600 W 



2° 


300 W 

GCS 1300 


1° 


800 W 



2° 


500 W 

GCS2000 


1° 


2400 W 


GCS 2400 modulare a convertitori componibili da 400 
* a 1200 Wat cad. per un totale di 2400 W 

Per richiedere Catalogo Generale, inviare L. 2000 in francobolli 

GRUPPI C. 

Cognome _ 

Nome_,_ 

Via_ 

Città__ Cap. _ 















One-liners 


en dieci i programmi su una linea 
sola pubblicati in questa puntata! 
Tra questi ce ne sono alcuni ideati dai 
lettori di Applicando ; si tratta degli 
one—liners 40, 41, 42, 43, 44, 45, in¬ 
viati rispettivamente da Riccardo Zu- 
lian, Oronzo Retino, Gian Luigi Piva, 
Alessandro Piraneo, Stefano Schem- 
bri e Gian Luca Belvisi. Il dischetto 
del servizio Disk Service che hanno 
scelto come premio sta viaggiando 
verso le loro case. 

Ecco il primo one-liner in assem¬ 
bler. Esegue la pulizia dello schermo 
in testo, con un piacevole effetto balle¬ 
rino. Per salvare su disco questa routi¬ 
ne dovete battere BSAVE BOUN- 
CE,A$300,L$52. Viene attivata con 
BRUN BOUNCE oppure, se il pro¬ 
gramma è già in memoria, con CALL 
768. 


* 300 .: 

351 








0300- 

A9 

01 

85 

3C 

4A 

90 

0A 

A6 

0308- 

3C 

20 

70 

FC 

CA 

DO 

FA 

F0 

0310- 

08 

A6 

3C 

20 

22 

03 

CA 

DO 

0318- 

FA 

E6 

3C 

A5 

3C 

C9 

19 

30 

0320- 

E3 

60 

A9 

17 

85 

25 

20 

22 

0328- 

FC 

A5 

28 

85 

2A 

A5 

29 

85 

0330- 

2B 

C6 

25 

A5 

25 

30 

0F 

20 

0338- 

22 

FC 

AO 

28 

88 

B1 

28 

91 

0340- 

2A 

88 

10 

F9 

30 

E3 

E6 

25 

0348- 

20 

22 

FC 

A9 

00 

85 

24 

4C 

0350- 

9C 

FC 








Un altro convertitore decimale/esa- 
decimale ma, contrariamente ai prece¬ 
denti, è il primo che per la conversione 
usa una routine inserita nelle ROM. 

10 FOR A = 768 T0 775: READ V: POKE 
A.V: NEXT : INPUT "NUMERO DE 
CIMALE:';DI:D = MAL (DI): POKE 
0,D - INT (D / 256) * 256: POKE 
1, INT (D / 256): CALL 768: PRINT 

: RUN : DATA 164,0,165,1.32 

,65,249,96 


r- 

oo 

O 

♦-> 

re 

4- 

(fi 



One-liner grafico che fa uso, alter¬ 
nativamente, delle due pagine grafi¬ 
che per presentare disegni in sequenza 
continua. 



HGR : H6R2 :D = 1 : FOR P = 1 TO 
50: FOR J = 1 TO 2: POKE 230 
.32 * J: HC0L0R= RND (1) * 

7 ♦ 1:L = RND (1) * 279:M = 

RND (1) * 191: FOR X = 0 TO 
279 STEP 8: HPLOT X,191 TO L 
,M TO 279 - X,0: NEXT X: HCOLOR= 
RND (1) * 7 + 1: FOR Y = 0 TO 
191 STEP 6: HPLOT 279,191 - 
Y TO L.M TO O.Y: NEXT Y: POKE 
- 1629? - D,Ò:D = 1 * D: NEXT 
J: NEXT P 


Normalmente sull’Apple //e e Ile il 
tasto DELETE non funziona. Ecco 
una routine in assembler che vi per¬ 
mette di utilizzare questo tasto per 


cancellare eventuali errori di battitura 
come se usaste l'Apple Writer. Viene 
salvata su disco con il comando BSA¬ 
VE DELKEY,A$3AC,L$20; ed è at¬ 
tivata con il comando BRUN DEL- 
KEY o, se già in memoria, con CALL 
940. Funziona solo in dos 3.3. 


bile A$ e la fa ruotare verso sinistra. 
La velocità può essere modificata pre¬ 
mendo, in fase di esecuzione, la frec¬ 
cia destra per rallentare e la freccia 
sinistra per accelerare. Raggiunta la 
velocità desiderata, la si può mantene¬ 
re premendo un tasto qualsiasi. 


Gi 

CO 

O 

<u 

4 -* 

(f) 


«3AC.3CB 

03AC- A9 88 85 38 

0380- A9 03 85 39 20 EA 03 60 

03B8- 20 18 FD C9 FF DO OC A9 

03C0- 88 20 FO FD A9 AO 20 FO 

03C8- FD A9 88 60 


Ecco una breve e semplice routine 
che disegna, in alta risoluzione, i profi¬ 
li dell’Italia. Modificando i DATA 
può eseguire anche altri disegni. 


o 

o 

4 —> 
<0 
4 -* 

(fi 


H6R2 : HC0L0R= 3: HPLOT 5.18 T0 
0.28 T0 5.40 T0 15.36 TO 29. 
43 T0 32.55 TO 55,75 T0 76.9 
0 T0 83.105 T0 80.112 T0 80. 
115 T0 85.113 TO 90,108 T0 9 
0.103 T0 95,103 T0 92,95 T0 
87.93 T0 92.82 T0 103,90 T0 
105.85 T0 80.72 T0 82,68 T0 
73.66 T0 62.60 T0 58.48 T0 5 
0.40 T0 48,30 T0 60,23 T0 58 
,10 T0 45,5 T0 5,18 


Mini gioco di abilità per due perso¬ 
ne. A turno un giocatore pensa una 
parola, che sarà quella da nascondere, 
e ne comunica la lunghezza; l’altro, 
che deve indovinarla, può stabilire la 
velocità di apparizione 
(SPEED = l-5). Quanto più è lunga 
la parola e quanto più è alta la veloci¬ 
tà, maggiori saranno i punti in palio 
(PRIZE). Nascosta la parola, premete 
G per iniziare. Vince chi arriva prima 
al punteggio massimo fissato. La velo¬ 
cità di illuminamento delle lettere 
componenti la parola può essere mo¬ 
dificata variando il ciclo FOR T= 1 TO 
480/V, mentre il tempo a disposizione 
per la soluzione può essere cambiato 
modificando il ciclo T = 1 TO 3000. 
Attenzione: nell’ultima istruzione 
PRINT c’è un CTRL—G tra le virgo- 
lette. 



TEXT : HOME :AI = "APPLICANDO 
- " :A = LEN (A*) - 1 : FOR I 
= 0 T0 1:1 = 0: VTAB 12: HTAB 
INT ((39 - A) / 2): PRINT A 
l:BI = RIGHTI (ALA) + LEFTI 
(Al, 1):AI = Bl: FOR X = 1 T0 
T: NEXT :P = PEEK ( - 16384 
) :T = T * (P = 149):T = ABS 
(T - (P = 136)): NEXT 


Questo breve one —liner grafico 
esegue un piacevole disegno in alta 
risoluzione che simula l’alba. 


co 10 TEXT : HOME : HGR : HC0L0R= 1 
* : HPLOT 0.158 T0 279.158: HPLOT 

O 0.159 T0 279.159: HC0LOR= 3: 

ro FOR T = 1 TO 100: HPLOT 139 

tS ,159 T0 INT ( RND (1) * 279 

□ ), INT ( RND (1) * 159): NEXT 


Interessante e pratico one-liner. 
Converte un numero decimale (per 
esempio 128.52) nella frazione che lo 
genera, ridotta ai minimi termini. 





o 

4 -« 

<0 



C = .1: INPUT ALAI = "0" ♦ Al: 
FOR I = 1 T0 LEN <AI):G = 

G + I M MIDI (Al,1.1) = \ 

■)sC = C * (1 4 9 * (G > 0)) 

: NEXT :BI = LEFTI (Al, ABS 

(G - D) 4 MIDI (AI,G 4 1): 

B = VAL (B$): FOR I = 1 T0 
8:2 = (1 4 (B / 2 = INT (B / 
2)) * (C / 2 = INT <C / 2)) 

) * (1 4 4 MB / 5 = INT ( 

B / 5)) MC / 5 = INT (C / 


5))) :B = B / 2:C = C / 2: NEXT 
: PRINT BVC 


Questo one-liner permette di sosti¬ 
tuire la testata del catalog (Disk Volu¬ 
me) con un altro nome. Il nuovo nome 
deve essere di 11 caratteri, spazi com¬ 
presi. Effettuato il cambiamento oc¬ 
corre inizializzare un dischetto nuovo 
per mantenere la nuova testata. 


1 HOME : FOR I = 193 T0 218: POKE 
1350 4 1,1: NEXT : POKE 34,6 
: HOME : INPUT "SPEED(l-5)/U 
r- 0RD*:V,PI: HOME :L = LEN (P 

* I): PRINT "PRIZE" :L * V: PRINT 

O "G=G0 - : GET Al: FÓR 1 = 1 T0 

« L:A = ASC ( MIDI (PI,1,1)): 

■g POKE 1478 4 A,A - 64: FOR T 

□ = 1 T0 480 / V: NEXT : POKE 

1478 4 A,A 4 128: NEXT : FOR 
T = 1 T0 3000: NEXT : PRINT 
-;PI 


Questa routine scrive al centro dello 
schermo la frase contenuta nella varia¬ 


10 PRINT "VECCHIO:":: FOR I = - 
g 19526 T0 - 19537 STEP -1: 
z PRINT CHRI ( PEEK ( 1 )) : : NEXT 

S : PRINT : INPUT "NUOVO :";A 
<S I: FOR 1 = 1 T0 11: POKE - 
.<2 I - 19525, ASC ( MIDI (Al,I. 

-J D) 4 128: NEXT : PRINT CHRl 
(4) ; "CATALOG" 


Cento programmi one liner sono dispo¬ 
nibili su dischetto. I prezzi e le modalità 
d’ordine di questo e degli altri dischetti 
disponibili sono riportati nella rubrica 
Disk Service. 

- X 


56 







applicami 0 

ha un WWV 

KK“HS=«Ss--- 

per no» perde* 10 ' 

abbonai subrt ° ! 

. . _j;;^ e . di programmi, 


, ndo caminiera di idee, di prag™"™' 

dfart'icoi'udi S £®® e pe™cato. le scorte sono limitate 

i ^ X®di questa pagina. 

Affrettati a spedire IH a 





Compila 

Corso M 
Oppure 



J 1 V* i ■■— 

Gratis, 
se ti abboni 
subito! 


r 


► 


# 


^j^’rssr^;.-*- 


1-1 * nV j a 'o^®' l ^ l °°^° nam en'o^000 a ii^e 2 cada u ^° r ^ er ^" e ^ enC °^ .. 

P ° 9 s eano non Msfer*» te * L . w | c /c posiate N.V”^ 

□ Pago fin d ora ^ '".autorizzando ' a . 

c“ntoB Z ankAmericard. .■.Nome. .. 

Cognome • 


Via ■• 
CAP 


Provincia •■ 


...Città 


Data 

















■mci anche _ 

• • ■• ■• » .#-» n Massetto • 

co r P -!„!„’!, 0 ?6cetlenle a'. ^ „„ n ,, cand0 11™ 1*____ 


SS?V' <2g?SZ2» 01 Appli-»"»» 

20, “ M — 



3 . settembre/Ottobre 19M - Lire 

7.000 - Un P'? t f^™ 0 ugo in Italia- 

aCCeSS nna scheda e una telecamera e il 
no • Una scneo „ spiritose o 

tuo Appledi ogni genere • 
bizzarre, * la dub e associa- 

Piccoli editori, circonaeresoci e abbo- 

. z ioni possono raggiuntosi d( quest0 

na " a m™ dal costo contenuto • Equo 
programma dal cos “ n , 0 in _ 

canone col VisiC P c DS Qp M-80 

ss&bsss- 

sonaiizzato scegli . con un uso 


po' di software, e il . . piano- 

un'intera filarmonica digitale . pef 

torte, organo e «olino ^oc erne nte ^ 
imparare a legger p , x m fl 0 gio 

periareesero.ziod>ngM s , èeachi 

del VisiDe^ G aaeUS^^ 

può servire , RornptQUtndici. 
computer della ApPte R p ette(e ne l 
quindici P«*ne bianch d schetti del 

giusto ordine • P«»"» gna de l- 

S i S tema Pascal ecco u ^ a 

, e possrbrbtà offerte e a^ a lus 

disposizione • « P « da Basic • 

* Teria <?*£M sofie m com- 
Guida ragionate dei si 3 dominiate • 

StiSCT'*'**** 

ware. 


SSK&SS- 

memoria i vosl ''Set la contabili- 
intero • Un P™ 9 ' a y n m a a o C o per due, nel 
ta'sempiticata• Ung^ ni di 


uno aei s*;* .- 

(oppure su dischetto a so«• *' d[0 

lire) «iinvesti- 
esatto di comevann vv co me 

meni *i na [’ B ?Ltettoie per la 9 e_ 
struttura, svesto nor tafoglio titoli • 
stione del ptopno poh 9 Basjc . u 
Quarta puntata del corso jone 

■famoso gioco delle treccene^ (a(a dl 

elettronica per ^P.? e p * tj ™ P 
un facile corso di Pascal. 


6. Matzo-Apó'BdS^^'pg^ata- 

Tre per tei un unico s 5 shee t • 
base, word-piacesso comp |e- 

Anteprimadi Appio/ ,., he 

to, compatto, compatì» # ^ di 
portatile,W®. J a “ e , obbligazioni'. 

stato, cartelle tono arie,^ . vos ,„ n . 

rApP ' e !immostro tira Valtro: riuscr- 
si»*' Ì .Stress:unnuo- 
rete a mangiarli tirar • # Mento¬ 

vo gioco per «ereI J a i c une 
ria riga per riga, co™ , erne nte con 

pedi di un Piogramra de | Pa¬ 
li unetinder • becono u com . 

^.cos'e' un corap»o #L , de¬ 
pilatole m torneo I b , ccamen to 
sott per ? em g leupero delle informa- 

airi»-'» 


► 



wssgSsiS 

Computer e pennell .W, v a . 
zare su schermo rapma 1 Conoscere i 
Topolino aiuta t bambini a s^ c re t .. _ 

numeri • P'09 ammi v nei vosttl 

dite ai curiosi' di fiera^ dj satvatag- 

pra0la Tòwtrare sSoi vostri pre¬ 
gio pev registrare su i^ # Gralicae ani- 

grammi ira' ir P p °S ala dell'Applesoft 
fiS ^segreti della grafica • 


Mac.» messeggid'er- 


Mac: tutte le novità dei wu tfM 

Ve gas • ( Pe,s °" a a m m i • AppKscuola: 
rore dei tuoi P °9!?n\ programmi 

una nuova serie d articoli e PJ^^. 

studiati per fé Mans in poi¬ 
docente universUa autom obili- 

trona: partecipate afta corea # ^ m 
stìca pW taraof del ra^e con n C om- 

sono sufficienti pe computer 

puter, ma con deci; , de!te ml - 

•aSSssssS HEsagiaSs 

l’Applesoft. 


Tipi e vanaum. ■ {zm \Q\ 

/Diventa un ^irarchivio dei tuoi 

l'Apple tiene m ordm e a g C am ma che vi 
dischi • AWm un pr^o e((on d , 

°bSae d di correggerli tutti insieme. 


9. Ottobre 1984 'iJSareUon^'rti 
que modem per collega //e; 

" ocali 6 Spinto ono compatibili? 
,inoaC 5 e Sa Apple: passate un 

• Grande S fon un Apple //c o 
intero we . eke ^ n L n De r voi • Fuoco 

un Macintosh tutto me t- 

fatuo'.unadventure^am rt. 

teal,a Basic creato per pro- 
Guìda all ^ s „u S MÒcintosh • Rota- 
grammare con i ^, e pj a . 

rione e traslazione^e para \telei se- 

ne VSata d Appliscuola • Ge- 
conda P unta ; a a a om bra per vr- 
rarchia, sequenza e °m to ap . 

sualizzare il Pascal • Come 

puntamento con i Pa^ ^ grafi . 

ottel i er u n 9 risoluzione utilizzando un 
ca ad alta jsore a colori • 

Apple II e un telev disporre 

Una sem P'!? a data memeirìzzata » 

sempre della d^ ^ione delle Pa- 
Piu ,a F e J a Ì« con il nuovo indi¬ 


lo - Novembre 1984 ’ Lue 7^00^ 

Una 9 uida pa ' e a i e e internazionali 
nelle reti nazione s$a con 

,C . ornp u Tuoi e o stila una gta- 

« Mac • autovetture d'epoca 

s ' 0n ?"naura r se inavvertta^nente si 
Niente paura se ma uR 

batte New ° pp ' * e sempre i dati 
grammaperritro va he sembran o 

immagazzinai c puntata di 

scomparsi •Lottava^^e mante . 

Applesoft vi 'h se 9 , n c osa 
nere allineate le nghe , teS ott e 

l’Integer differisce oaii uu^ deHa 

perchè per 9”*re p a[ame tri, pro- 

language card^ sesta pu nta- 

Ced a? Pasca •’ Appliscuola: rette 
ta del Pasaa ' : an q equazioni dei 

rispettivi vaSort^caicolo del coetti- 

ciente di correlazione. 


















11 ■ 

banca dati per avere soi ^ , (a 
articolo, il suo ubbl j Ca to • Per 

SS«SSSri»- 
^«isstsss 

"--«trss-»- 

sulla scrivania, auora pere afciató? ^ 

r-?“Srssts» 
^jSSiWSS 

scuola: come si s eS nress\on\ in 
didattico? Per nsoWere ^ . 

modo da impararle •*" 

Novità software e dar 


Bridge con ' WJ^ 0 ne; il computer 
narsi nella d,ch ' a ]?L a deano avversa- 

tiene il punteggio ® a ^j^uzione • 
rio con 9 raiica ' n nnr amma per capire 
Microcalc, unP«W^ p he mette a 

VisiCaceipacchett >m ■ o(on 

disposizione 20 tigne P ^ da 
per un totale d«» *» . Un corso 
riempire se « iente pe[ m- 

cWa ' 0 ' S S»taDleWottelTtepetTe 


s»-rslS“S 

e i suo* strumentt JP e | visiCaic; in 
base e word P'^^q pronto da 

ogni articolo, un _hndnetotoiessiona- 

usare: il primo*® W P lte 


le» Una potente con questa 

l'editing dei proto' a un program- 
utilitv PO* j„'| e istruzioni DATA 
mapt f u ScS unfileptesen- 
? 1 Ssr*1peoia'® Appliscuola: 
animazione di una rotazione. 


1 A - Marzo chiotto 

computer per meco , . tf| otdl . 

alla sM de " za jS f a manutenzione • 
nana e straordinana rran isegn0 

Per trasformare una parai _ , Un 

un grafico in Apple pua - 

programma P p pet poi giocar- 

lunque perewso * ^ avrete voglia • 
ci ogni volta o™ n A p(e vjorks 
Mentre imparata usei o vo(te 
gre per Te) e^VisiCac^ mo deilo 
potete costruire un minuti 

P pe, compila^ ^ aconte . 

•iJ0P ,0Q,a ®^ca un altro per ri- 
re in età P [eac S a f n n ’terzo per miglio- 
passare le « f a e Appliscuola: 
rare l'ortogralte • Macin- 

stima dei frutteti co c s omand0( potete 

toslv. Coman * n p de P maggiori e pm 
disegnare con und , n sieme an- 
creativi esperti del mono . , icl a 

che.natu.almerde,conMac c _ 

colonna, a torta, a w». 

Chart» Hit-parade del mese 


15 ‘ Apr ’'f tttti sparsi 
più fogli e W-*»*, ricette di 

SBSfe'Sft*» 
“» £ S'S 5 “ 5 - 

bile sara diesel o s genere 

torio di suon ' a 'n vostri program- 
per colonna sonora ai v°s v . 

mi,., • ^i° ca ! a rhe atttta a struttele in 
Un programma che aiu deirAppte • 
pieno le qualitì pia n ® ,. vostIi pt0 . 

Un menù protesa^ 9^ ((ecce evi . 

grammi: con 1 ausn u prò- 

denziate con una barn lumino # ^ 

gramma ette volete far gmr Te y„ 

nua ir« Pigiai un 
data basa * S^àno pei tendere evi- 
diagramma caneswnu v del ma s- 
dente l'algoritmo P programma 

simo cornuti divisore, e . 

americano Se'ag P Mac . Magic 


17 - Gi u 9 n0 .'' 98 ® n ’n'incoio dizionario 
principali nozioni.■ ate pet 

nautico ® ^ a .Sin a nte mondo della 
en ! tar ! un nmoramma che tras orma 


entrare chetrasforma 

ve ia • Un Pto^mma ^i 

l'Apple in una J“' D è,pianificarequa- 
RPN • u , na S badale americano tra 

lunque itinerario strada^ S1 

ben 171 ®« ad S Iscitete a trovare 

^ su « Sf a Sione Apple- 


• ■< noi;_ _ v ire 7.000 ■ Un 

16 -Maggio 98 ® izìonate per 
sistema di data 6a f on da detta propria 

personalizzate, a abitudini ali- 

Sostituzionelrsteae^eau unga0 
mentati, una tote m ^ pata base 
breve scatterrai»Wara c ome 

nel corso App^m. p. Pomp retr. 
tarsi un'agendai teleton ^ # Un p(0 

un gioco daz '?rtttrasformarel'Apple// 

grammacapace J sQ time r «.U® 

• in un fedele e P emu \ a re i piu po- 
tavoladi disegno per ot # Come 
tenti programmi di CAOj ^ mpiut0 su 
scrivete un , pI c 9 0 ™ c ttiamati one-Uner 
una linea sola. bon rh-„ cen t 0) a pun- 

e Aopiicando ne pubbUw cemu, h - ^ 

de del mese. 


umi ii i m x. r'mscireie a «u®- 

^aftSfa tteazione Apple- 
rifugio? • Una PP ^ comp \ e ta ge- 
vjorks (Tre P er J^ . p # Un programma 
sftone di un negozio attere statisti- 

CO con la P 0SSlb . ' ia Ham ento delle re- 
sioni i® base l a n S « Sparate a 
gressiom sui date colpiti! • 

vitor ma ^ a ^i 0 pr „. 


(tre per te l^. Ì| ìtv per personale- 
processor • Una ut v ^ Pe \\’App\e • 

zare il P'P Perseguire l’andamento 
Un programma pw seg“ cicli mese 

de ' pro P p :; b j°pr ^e-ioW^ 
per mese • w ^ . migliaia di io- 

raut0 . aSSm relativi calcoli • 
glietti e impazzire coii > ' , un gta . 

y C ome esamina' f^fpossibUità di 
fico di una tunzion ,. ee ( j 1 


19. Sett emdre ^ 8 to re L quaiido 0 so°no 

Oracolo, P ernon Andanti • D'99 er e 
in ballo decisionuP marzia- 

Ciaustropttobia, due g p pacifisti 

ri, soprawssuY econdo» « « se- 

(quanto baste) is^onoO o . n 

greti per .un a “ lla9 ame # Tuftì , CO nti 

un programma P®. 


gruppi di 5-25 uW g, am ma per 
dello studio legto. un ^ Pe( ca ri- 


Come esa^^J^Mn'ia'possibilitì 

q programma pera re le scrme^ ^ 

mente ®®to at L S D 0S . u na lezione sotto 

Sfsr.s:»*» 

ntere.Contmail^o #t . n . 


grammi su una linea ^ # Ma . 

. Hit-Parade 

del mese. 


utility p«'^-' 0 èia serie 

^, e . Continadconcole _ 

ttx m^****™ 

TbunderScan. 


avvocati ^dai aw« in ^ 

care in di un codice macche 

plesoftal di sopra oiu ^ ll( . pw 
na ci vuole un ublrty-- P ancbe 

mousei ' .aa^'a^.Agazzino • Al- 
per i movimenti cassa » , onartl . 

• tri cinque di articoli sul- 

inizia una splendida sene risolu . 

ruso be 'uacintosh MicrosoftWord è 
zi° ne • Macintosh aV vero \a spe- 

unpr0 J ra Svi oer^acquistarlo • Ag : 

^ornatissimo il ratalogo di programmi 

e accessori. 


SllaVn'™ di Applicando 

20122 “ 








Basic Writer consente il collegamento diretto tra 
l’ambiente di manipolazione del testo dell’Apple Writer e 
l’ambiente Basic Applesoft. Se poi Util Writer e Pro Writer... 


Potenziamo 
l’Apple Writer 


I pacchetti integrati sono ormai di 
moda, eppure anche il pacchetto 
più potente, il programma più sofisti¬ 
cato a volte mostra i suoi limiti. Un 
programma, come ogni altro strumen¬ 
to di lavoro, viene progettato per risol¬ 
vere un particolare tipo di problema. 
Con il tempo possono venir elaborate 
nuove strategie, i termini stessi del 
problema possono cambiare, devono 
essere messe a punto nuove soluzioni 
per vecchi problemi e altri problemi 
possono sovrapporsi. Senza un’ade¬ 
guata manutenzione anche il program¬ 
ma più sofisticato dopo alcuni anni di¬ 
venta obsoleto, poiché non riesce ad 
adeguarsi alle nuove necessità dell’u¬ 
tenza. 

Una strada, piuttosto battuta attual¬ 
mente, è appunto quella dell’integra¬ 
zione, che indubbiamente amplia mol¬ 
to le possibilità di impiego e, fatto non 
trascurabile, offre un invitante rap¬ 
porto tra prestazioni e prezzo, ma è 
bene diffidare dei programmi troppo 
pretenziosi poiché possono rivelarsi 
poco specifici e poco profondi: anche 
se si cerca di ottimizzare le risorse è 
fisicamente impossibile che lo stesso 
strumento possa risolvere tutto. 

Certamente a tutti, una volta o l’al¬ 
tra, utilizzando assiduamente un certo 
programma sarà capitato di dire: que¬ 
sto pacchetto è ottimo, certo che se 
potesse fare anche questo sarebbe fan¬ 
tastico! Certo sarebbe davvero fanta¬ 
stico un programma che cresce su mi¬ 
sura con le nostre esigenze, ma è poco 
realistico pensare di modificare e di 
personalizzare il software che ci inte¬ 
ressa. La soluzione è quella di creare 
del software specifico, potente e so¬ 
prattutto programmabile. 

Con Basic Writer si realizza appun¬ 
to un progetto di questo tipo. Mentre 


da una parte l’Util Writer e il Pro Wri¬ 
ter offrono il supporto necessario per 
eseguire complesse operazioni di au¬ 
tomazione d’ufficio e di stampa sofisti¬ 
cata, Basic Writer consente di realiz¬ 
zare un collegamento diretto tra l’am¬ 
biente di manipolazione del testo del¬ 
l’Apple Writer e l’ambiente Basic Ap¬ 
plesoft. 

Per capire la portata di questo passo 
basta riflettere sulle conseguenze più 
immediate che tutto ciò comporta: po¬ 
ter comunicare con il Basic consente di 
saltare da una parte all’altra con il du¬ 
plice vantaggio di essere in grado di 
intervenire sul testo attraverso l’ese¬ 
cuzione di un programma Applesoft, 
riportando poi i risultati dell’elabora¬ 
zione all’ambiente testo, e nel contem¬ 
po di utilizzare la potenza del word 
processor nella stesura stessa del testo 
del programma. Se a ciò si aggiunge il 
fatto che tutto è perfettamente compa¬ 
tibile con i programmi scritti in WPL, 
con le utility dell’Util Writer e le riso¬ 
luzioni di stampa del Pro Writer, si ha 
la sensazione di poter usufruire delle 
potenzialità tipiche di una stazione 
professionale di elaborazione testi. 

Il programma 

Il programma naturalmente deve 
essere utilizzato unitamente all’ Apple 
Writer //, in versione sia italiana sia 
americana, distribuito dalla Apple 
Computer. Ecco la configurazione 
hardware minima: Apple //e, scheda 
80 colonne con espansione di memoria 
da 64 K, monitor, 1 Disk Drive, stam¬ 
pante Apple ImageWriter o Dot Ma¬ 
trix Printer o Epson MX III, RX, FX. 
Oppure: Apple //c, monitor, stampan¬ 
te ImageWriter. 


Basic Writer // mette a disposizione 
una lunga serie di facility che possiamo 
riassumere in quattro gruppi: 

1. Rapido collegamento all’ambiente 
Basic e strumenti per gestire questo 
collegamento. 

2. Programma Super—calcolatrice, 
che consente di effettuare complesse 
operazioni matematiche senza uscire 
dall’ambiente di elaborazione del te¬ 
sto. 

3. Programma Graphic Writer //, che 
consente di caricare dei grafici prece¬ 
dentemente costruiti, per esempio con 
un programma Basic, o con un qual¬ 
siasi pacchetto grafico, e di stamparlo 
integrato con il testo. 

4. Tutta una serie di nuovi comandi 
che vanno ad aggiungersi a quelli del 
word processor e che oltre ad ampliare 
alcuna funzioni preesistenti realizzano 
l’integrazione con il Pro Writer //. 

L’ambiente Basic 

Il collegamento con l’ambiente Ba¬ 
sic viene gestito da una serie di coman¬ 
di che permettono di esportare dal WP 
al Basic sia comandi, in modo diretto o 
sotto forma di linee di programma, sia 
parti del testo, inserendole automati¬ 
camente in opportune variabili Basic: 
C.BA x> Esegue in Basic il comando 
"x" e appena terminato torna in Apple 
Writer. 

C.BB x> Esegue in Basic il comando 

"x" e rimane in Basic. 

c.BC x> Continua l’esecuzione di un 

programma Basic precedentemente 

interrotto. 

Per esportare una parte di testo in 
Basic basta semplicemente specificare 
il nome della variabile in cui lo si vuole 
memorizzare tra due caràtteri di con- 
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Una videata del word processor; è attivato, accanto al testo, il 
programma Super Calcolatrice. 


trol Y, quindi delimitare l’area da 
esportare con control T o control N; 
ecco un esempio: 

<control Y> A$ = <control Y> 1247 
< control N> 

In questo esempio si è utilizzato un 
control N, poiché il dato da inserire 
era un numero e non un testo, ma 
questa scelta ha la validità di un pro¬ 
memoria perché da WP le variabili 
vengono tutte esportate e importate 
sotto forma di testo. 

Una volta impostata la riga dell’e¬ 
sempio precedente è sufficiente anda¬ 
re in ambiente Basic e digitare il co¬ 
mando &L per caricare tutte le varia¬ 
bili definite nel testo del WP nelle cor¬ 
rispondenti variabili Basic. A questo 
punto, una volta realizzato il passag¬ 
gio dei comandi e dei dati, il Basic può 
elaborare autonomamente le informa¬ 
zioni, per esempio attraverso un pro¬ 
gramma, e in un secondo tempo resti¬ 
tuire al WP i risultati di tale elabora¬ 
zione. Ecco i comandi disponibili per 
eseguire l’import—export delle varia¬ 
bili al WP: 

&R Riporta in ambiente WP. 

&S Riporta i contenuti di tutte le va¬ 
riabili comuni all’ambiente WP. 
&S,A$ Riporta solo il contenuto della 
variabile specificata anziché di tutte; è 
più rapido del comando precedente se 
non è necessario aggiornare tutte le 
variabili. 

&L,A$ Carica in Basic soltanto la va¬ 
riabile specificata. 

&S,A$ (! e &L,A$ (! Il punto esclama¬ 
tivo viene usato come metacarattere 
jolly e sta a signicare che il comando 
deve estendersi a tutte le variabili che 
matchano con i caratteri che lo prece¬ 
dono: per esempio per importare in 
Basic tutti gli elementi di un vettore 
A$ (,) è sufficiente digitare &L,A$ (! 


&P, A$ Con questo comando si posso¬ 
no inviare ad Apple Writer una serie 
di caratteri o dei comandi, come se 
questi appartenessero al glossario. Il 
breve programma che segue consente 
di caricare dal drive 1 in Apple Writer 
un file chiamato "ESTERNO": 

10 A$="ESTERNO" 

20 B$=chr$ (12)+A$+",Dl"+">2 
30 &P,B$ 

Dove chr$ (12) è il comando control 
L e > è il carattere di RETURN simu¬ 
lato per la versione italiana. 

Ma non è tutto; infatti Basic Writer 
consente una comunicazione comple¬ 
ta anche con i programmi scritti in 
WPL attraverso due comandi analoghi 
a quelli già descritti. 

&1 Richiama le variabili del WPL in 
Basic. 

&s Memorizza le variabili Basic nelle 
corrispondenti WPL. 

Poiché le varibili WPL e quelle Ba¬ 


sic hanno una denominazione diversa, 
i loro nómi saranno diversi a seconda 
dell’ambiente in cui ci si trova. Ecco la 


corrispondenza: 


Var WPL 

Var Basic 

$A 

WAS 

SB 

WBS 

se 

WC$ 

$D 

WDS 

X 

x% 

Y 

Y% 

Z 

Z% 


Va infatti ricordato che il WPL con¬ 
sente soltanto 4 variabili di tipo stringa 
di massimo 64 caratteri ciascuna e 3 
variabili numeriche di tipo intero. Il 
Basic Writer consente di usufruire del¬ 
la grafica ad alta risoluzione, ma per 
fare questo, da Basic naturalmente, è 
necessario liberare la zona di memoria 
utilizzata dalle pagine grafiche e che 
normalmente è occupata da parte del¬ 
l’Apple Writer. Per fare questo sono 
disponibili 2 comandi che liberano la 
pagina desiderata: 

&G1 Predispone l’uso della pagina 1. 
&G2 Predispone l’uso della pagina 2. 

La memoria viene ripristinata auto¬ 
maticamente quanto si ritorna in Ap¬ 
ple Writer. 

Pochi comandi tutto sommato, ma 
estremamente potenti, che consento¬ 
no di utilizzare in modo integrato tre 
strumenti (il WP, il WPL e il Basic) 
per realizzare tutto ciò che si desidera 
da un elaboratore di testi. 

Due notevoli applicazioni sono ab¬ 
bastanza evidenti. Da una parte pos¬ 
sono essere risolti tutti quei problemi 
legati alla modulistica, che fino a oggi, 
senza un adeguato supporto di calco¬ 
lo, con un WP non potevano essere 
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col legamento de'* modo’ °d i *'ttu!T ’d i WRITER rende Possibile un 

programmazione Basic Applesoft, AppU Wr,ter // con il linguaggio di 

linguaggi^ póTchè", e ' "posHbn ! U g? à ? V P U di conoscere tale 

J^stanz^erose^so^,^, anch? l ^e^on^rog/La^re. 


Un esempio di intestazione in grafica HI-RES, a cui segue il testo in 
caratteri normali. 
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Una realizzazione del programma: nella stessa pagina sono affiancati il 
testo e un istogramma. 


gestiti. L’esempio tipico della fatture e 
delle parcelle è solo la punta di un 
iceberg, in realtà ovunque debbano 
coesistere maschere di input predefi¬ 
nite, informazioni da ricevere e elabo¬ 
rare, un output sofisticato da format¬ 
tare adeguatamente, non si è più co¬ 
stretti a delegare alcune funzioni a co¬ 
stosi pacchetti creati ad hoc; ora è in¬ 
vece possibile affidarle ad Apple Wri- 
ter. 

Dall’altra l’annoso problema del 
programmatore Basic, costretto a im¬ 
plementare il proprio software senza il 
supporto di un editor adeguato, può 
essere ora risolto digitando il pro¬ 
gramma direttamente nel WP e poi 
facendolo eseguire saltando in Basic. 
È sufficiente a questo scopo definirsi 
due comandi nel glossario, per esem¬ 
pio mela vuota A e mela vuota B, che 
rispettivamente inseriscono e tolgono 
in testa a ogni linea di programma il 
prefisso .BA; ecco come vanno defini¬ 
ti rispettivamente: 

Mela vuota A A Bé Fé<><>- 
.BA<A> 

Mela vuota BB Bé Féo.BAO 
<A> 

Chiaramente Apple Writer // più 
Basic Writer come editor portano via 
una buona fetta di memoria, ma se 
non si fa uso di Pro Writer e di altri 
fonts di caratteri restano liberi 21244 
bytes, più che sufficienti per definire 
ragguardevoli segmenti di program¬ 
ma. 

Anche i punti 2 e 3 possono essere 
considerati come dirette applicazioni 
delle possibilità offerte dalla program- 
mabilità. 

La calcolatrice 

Il programma che fornisce la facility 
della calcolatrice durante l’elaborazio¬ 


ne del testo è interamente scritto in 
Basic e fa un uso esteso del comando 
&P che consente di importare dal Ba¬ 
sic i comandi contenuti nel glossario. 
Questo programma viene automatica- 
mente caricato in memoria al momen¬ 
to del lancio di Basic Writer. Per ri¬ 
chiamarlo basta premere mela vuota 
K. Sono disponibili tutte le funzioni 
tipiche di una calcolatrice scientifica; 
in caso di bisogno è sufficiente preme¬ 
re ? per visualizzare una finestra con 
l’elenco dettagliato di queste funzioni 
e del modo di attivazione. Un fatto 
molto interessante è che è possibile 
spostarsi lungo il testo mantenendo at¬ 
tiva la calcolatrice, sia con le frecce sia 
con control B e control E. 

Inoltre, e non c’è da stupirsi, la cal¬ 
colatrice può comunicare direttamen¬ 
te con l’ambiente WP. Infatti è possi¬ 
bile assumere come input dati presenti 
nel testo e scaricare sulla pagina, nella 
posizione del cursore, il risultato del 
calcolo che compare sul visore della 
calcolatrice, rappresentato sulla linea 
di comando dell’Apple Writer. 

La grafica 

Un’altra caratteristica che rende 
praticamente unico Basic Writer è 
quella di poter mandare in stampa 
contemporaneamente testo e alta riso¬ 
luzione. Ma non solo: è possibile an¬ 
che intervenire sul grafico adeguando¬ 
lo alla formattazione del testo. È suffi¬ 
ciente che il grafico sia salvato sul di¬ 
schetto di lavoro, in DOS 3.3, quindi è 
possibile costruire i grafici con pro¬ 
grammi del tipo Visiplot o Mouse- 
Paint e poi utilizzare il programma 
GRAPHIC per mandarli in stampa. 
Per prima cosa è necessario caricare il 
programma di grafica in memoria con 
il comando : 



Ccontrol P> BA LOAD GRA- 
FIC,D1 RETURN 

A questo punto è sufficiente inserire 
nel testo al punto desiderato la linea 
seguente: 

.BB RUNV'NOME GRAFICO,DI" 

In questo modo quando in fase di 
stampa il programma elabora una riga 
di questo tipo, viene caricato e stam¬ 
pato il grafico indicato, secondo i pa¬ 
rametri specificati in Graphic Writer. 
Questi parametri possono essere mo¬ 
dificati a seconda delle esigenze. E 
possibile modificare i parametri di 
stampa caricando in memoria Graphic 
Writer e cambiando i valori di densità 
di stampa, di scala verticale, scala oriz¬ 
zontale e specificando la posizione re¬ 
lativa del disegno all’interno della pa¬ 
gina di testo: giustificato a sinistra, 
giustificato a destra o centrato. Tutto 
ciò consente di produrre documenti 
correlati da grafici di tutti i tipi, a bar¬ 
re, a torta, istogrammi, intestazioni in 
alta risoluzione, isolati o inframmez¬ 
zati nel testo. Oltre a ciò è sempre 
possibile accedere alle diverse fonti 
messe a disposizione dal Pro Writer: 
dal grassetto al corsivo, dal classico al 
quadrato eccetera. 

Il potenziamento 
di Apple Writer 

Ecco infine un rapido cenno sui 
nuovi comandi che Basic Writer mette 
a disposizione o che semplicemente 
estende e potenzia. 

Funzione di compattamento del vi¬ 
deo per nascondere i caratteri di con¬ 
trollo; a questo proposito occorre ri¬ 
cordare che BW corregge l’errore, in¬ 
dotto sulle giustificazioni, dalla pre¬ 
senza dei caratteri di controllo in fase 
di stampa. 

Funzione di sovrapposizione conti¬ 
nua del tasto, che consente di mante¬ 
nere inserito il corrispondente coman¬ 
do di Apple Writer anche dopo essersi 
spostati lungo il testo. Questo è infatti 
indispensabile se si desidera, per ricol¬ 
legarsi al discorso della modulistica, 
inserire in modo ripetitivo una serie di 
dati all’interno di una maschera di in¬ 
put predefinita. 

Glossari di comandi per le stampan¬ 
ti Apple ed Epson. 

Il programma Basic Writer // è pro¬ 
dotto e distribuito dalla Polisistemi srl, 
via Derna 19,20132 Milano, a 130 mila 
lire più Iva. E anche disponibile il pac¬ 
chetto comprendente anche il pro¬ 
gramma Pro Writer, e costa 195 mila 
lire più Iva. Marco Gussoni 
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Ovunque mi compri 
ono garantito 
n anno, ma solo 

SALS INFORMATICA 

i assiste gratuitamente 
casa". 


L'offerta è valida per 
tutti i sistemi APPLE 
venduti dalla 
SALS INFORMATICA, 
a Genova, a partire 
dal 31 marzo 1985. 



[cippk* computer 


□f llal* 


LDL 


Informatica 





Apple 



Via C. D'Annunzio, 2-35 Genova - Tel. (010) 58.93.27 



/ Centro dimostrativo Sals informatica 
Viale Brigate Partigiane. 132 R. Genova 



Apple 

Macintosh 

floppy 

software 

accessori 

periferiche 

compatibili 

Distribuiti in Italia 
con garanzia Italiana 
ai orezzi più bassi. 

da: C. RRGG I 0 s u c 

56030 Perignano pi Via Spinelli 8 
tei. 0587-516207 

fì I curi i esemp i : 

Apple / /e originale 990 000 
idem o.s. prodotto Italia 635.000 

sch.80 col +64k originale 351 .000 
idem c.s. prodotto Italia 79.000 

interfaccia seriale orig. 150 000 

idem c.s. prodotto Italia 125.000 

duodisk originale 799.000 

idem c s prodotto italio 545.000 
drive agg compat ib. / io 365.000 
mouse originale c/ man. 169 000 

monitor //e originale 259.500 

floppy 5"e1 /4 3.390 

rnicrofloppy 3 M e 1 /2 8 475 

IBM XT compatibile prodotto Italia 
XT 256k rom e 1 drive 1.849.000 
idem c s con 2 drive 2.129.000 
c .s con HD 10 mego 3 .499 000 
o s . con HD 20 mego 4.290.000 

... e tante altre cose a 
condizioni favolose 

prima di o g ni acquisto . 
senti le ns. proposte . , » 
da noi spendi meno! 

Listino completo inviondo 4 .000 lire 
o cori lo primo fornitura. 

Materiali consegnati a domicilio con 
garonzio 12 mesi completa e clousolo 
SODDISFATTO 0 RIMBORSATO 
entro otto giorni 

Sconti per quantità 

I prezzi non comprendono PIVA 

IBM e un rnorchio reg.lBM cor por. 
Apple, Duodisk. Macintosh, sono 
marchi di opple computer ine 


Mouse 

Inverse 

ROM 


Per dialogare meglio 
con il tun Apple// 



Se utilizzando il tuo nuovo Apple // hai dei problemi di 
visualizzazione dei testi in Inverse (testo nero su fondo 
chiaro), se compaiono simboli strani, vuol dire che stai 
usando un programma studiato prima dell'introduzione dei 
caratteri speciali del Mouse. Niente paura: Applicando ha 
preparato per te la Mouseinverse ROM che inserita nel tuo 
Apple // ti consente di utilizzare senza problemi tutti 1 
programmi, sia quelli che non impiegano i caratteri del 
mouse, sia quelli più recenti che li usano semplicemente 
cambiando la tastiera con il commutatore presente sul tuo 
Apple. 



Ecco come si trasforma, con l’utilizzo della Mouseinverse ROM, la 
visualizzazione del programma Apple Writer. 


La Mouseinverse ROM costa L. 47.200 e la trovi presso i 
rivenditori autorizzati Apple Computer. 

Oppure la puoi ordinare direttamente a Editronica srl Corso 
Monforte 39 20122 Milano allegando assegno o ricevuta di 

versamento sul Conto Corrente Postale N. 19740208. 










































Il controllo del valore di una variabile è uno dei metodi più 
efficaci per l’individuazione degli errori (debugging) di un 
programma. La utility in Applesoft presentata in questo 
articolo permette all’utente di visualizzare i valori di quasi 
tutte le variabili e può essere richiamata daN’interno del 
programma nel momento voluto. 


DOS 3.3 


ProDQS 


APPLE //e 
APPLE'//c 


«IH' 

m 

«in 


Se la variabile 
fa DUMP 


A i tempi andati, quando la memo¬ 
ria di un computer era fatta di 
ciambelle magnetiche chiamate nu¬ 
clei, uno strumento importante utiliz¬ 
zato dai programmatori per trovare gli 
errori nei loro programmi era il core 
dump, o riversamento del nucleo. Un 
riversamento di nucleo o memoria è 
l’uscita, solitamente su una stampan¬ 
te, del contenuto di tutte le locazioni 
di memoria che si trovano in una fascia 
di indirizzi specificata. Riversando la 
parte della memoria in cui sono imma¬ 
gazzinate le variabili del programma il 
programmatore ottiene un’istantanea 
(snapshot) dello stato del programma 
al momento in cui è stato fatto il river¬ 
samento di memoria. 

I riversamenti di memoria sono 
stampati di solito nel formato esadeci- 
male, e quindi si ha in genere il compi¬ 
to piuttosto formidabile di decifrare i 
valori delle variabili. Nell’Apple i ri- 
versamenti di memoria si possono ot¬ 
tenere con l’impiego del monitor, ma 
il dump è pur sempre nel codice esade- 
cimale, relativamente imperscrutabi¬ 
le. 

Quando si fa il debugging di un pro¬ 
gramma in Applesoft si può guardare 
il valore di qualsiasi variabile o insie¬ 
me di variabili semplicemente stam¬ 
pandole con PRINT. Queste istruzio¬ 
ni PRINT di diagnosi possono essere 
messe nel programma stesso, o se ne 
può fare l’esecuzione immediata du¬ 
rante una pausa nell’esecuzione del 
programma. 

Una difficoltà di questa prassi è che 
in molti casi non sappiamo quale va¬ 
riabile (o combinazione di variabili) 
abbia il valore che sta causando il fun¬ 
zionamento difettoso del programma. 
Ciò che occorre è un modo semplice di 


riversare i valori di tutte le variabili del 
programma, in modo di avere un’i¬ 
stantanea completa dello stato del 
programma. Il programma di utility 
VARIABLE DUMP (riversamento 
delle variabili) descritto in questo arti¬ 
colo svolge appunto questa funzione 
di debugging. 

Come usare 
il programma 

Questo programma di debugging 
può essere usato in tre semplici passi: 

1. Aggiungere le istruzioni del pro¬ 
gramma VARIABLE DUMP al pro¬ 
gramma che si sta collaudando. 

2. Far girare il programma che si sta 
collaudando. 

3. Trasferire il controllo alla routine di 
riversamento delle variabili. 

Il programma di utilità VARIA- 


NX = 

2 

c = 

1 

HT = 

10 

V/ = 

1 

hlx 

= 1 

s = 

8 

MI = 

0 

M2 = 

? 

VSX 

= 2 

cs = 

8 

K = 

13 

OS = 

8 

RX = 

20000 

MD = 

10000 

SU = 

30000 

NIX 

= 1 • 

A* = 

FINE 


Dump delle variabili di un 
programma al termine della 
sua esecuzione. 


BLE DUMP gestisce tutti i tipi di va¬ 
riabili e le matrici unidimensionali. 
Non gestisce le matrici multidimensio- 
nali. Se lo facesse, non solo il pro¬ 
gramma sarebbe troppo complesso e 
lungo, ma il riversamento delle matrici 
pluridimensionali multiple sarebbe 
voluminoso, e non sarebbe in linea ge¬ 
nerale di aiuto nel debugging del pro¬ 
gramma. Si possono riversare in modo 
selettivo gli elementi voluti di simili 
matrici multidimensionali con la tecni¬ 
ca convenzionale dell’istruzione 
PRINT. La utility VARIABLE 
DUMP identifica ogni variabile dalle 
sole prime due lettere del suo nome. 
Ciò non dev’essere considerato una 
vera limitazione, in quanto l’Apple¬ 
soft stesso impiega solo le prime due 
lettere per identificare i nomi di varia¬ 
bile. Così se c’è un’eventuale incertez¬ 
za circa la variabile del programma 
che viene riversata, questa incertezza 
è causata dal fatto che due o più nomi 
di variabili cominciano con le stesse 
due lettere e che l’Applesoft le tratta 
come un’unica variabile. 

L’effettuazione 
di Variable Dump 

Il primo passo, quello che consiste 
nel mettere le istruzioni di riversamen¬ 
to nel programma in prova, si può rea¬ 
lizzare in vari modi. Naturalmente le 
sue istruzioni potrebbero essere battu¬ 
te direttamente nel programma. Però 
questo procedimento è tedioso e porta 
via tempo, e scoraggerebbe dall’uso 
frequente della routine. Un metodo 
più efficiente consiste nel fare l’EXEC 
delle istruzioni nel programma in pro¬ 
va da un file di testo. 
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Listato 1 


100 REM ********************** 

200 REM * MARIA8LE.DUMP * 

300 REM * BY TOM GABRIELE * 

400 REM * COPYRIGHT <C) 1985 * 

500 REM * BY APPLICANDO 4 * 

600 REM * MICROSPARC, INC * 

700 REM ********************** 

63000 20 = 0:Z1 = 0:22 = 0:24 = 0:25 = 0:26 = 0:27 = 0:28 = 
0:29 = 0 

63010 GOSUB 63360 

63020 HOME : PR1NT "(C) BY APPLICANDO 4 MICROSPARC, INC.*: 

PR1NT : PRINT "APPLESOFT UARIABLE DUMP": PRINT 
63030 IF 29 = 28 GOTO 63130 
63040 GOSUB 63270 

63050 GOSUB 63320: IF (20) GOTO 63120 

63060 GOSUB 63300 

63070 PRINT CHR* (ZI): CHR* (22): 

63080 1F (24) THEN PRINT "7 = ";Z37: GOTO 63110 

63090 1F (25) THEN PRINT "* = ";Z3*: GOTO 63110 

63100 PRINT "=":Z3 

63110 GOSUB 63310 

63120 29 = 29 + 7: GOTO 63030 

63130 GOSUB 63440 

63140 IF 29 > = 28 THEN PRINT : PRINT "FINE DEL RIVERSANE 
NTO DELLE VARIABILI": END 
63150 GOSUB 63270 

63160 PRINT "MATRICE “:: GOSUB 63400 
63165 IF PEEK (29 + 4) > 1 THEN HTAB 11: PRINT "MATRICE M 
ULTIDIMENSIONE": GOTO 63260 
63170 GOSUB 63300 
63180 PRINT 

63190 FOR 26 = 0 TO PEEK (29 * 6) ♦ 256 * PEEK (29 + 5) - 
1 

63200 PRINT "ELEMENTO (":26;") = 

63210 IF (24) THEN PRINT 237.(26): GOTO 63240 
63220 IF (25) THEN PRINT 23*<Z6): GOTO 63240 
63230 PRINT 23(26) 

63240 NEXT 26 

63250 GOSUB 63310 

63260 GOSUB 63390: GOTO 63140 

63270 21= PEEK (29):Z2 = PEEK (29 + 1) 

63280 24 = 21 > 127:25 = 22 > 127 
63290 RETURN 

63300 POKE 29,90 ♦ 128 * 24: POKE 29 * 1,51 ♦ 128 * 25: RET 
URN 

63310 POKE 29,21: POKE 29 ♦ 1,22: RETURN 
63320 20 = 0 

63330 IF NOT (ZI = 90 OR 21 = 138) THEN RETURN 

63340 IF ((22 - 128 * 25) ) 47) AND ((22 - 128 * 25) ( 58) 

THEN 20 = 1 
63350 RETURN 

63360 29 = PEEK (105) + 256 * PEEK (106) 

63370 28 = PEEK (107) ♦ 256 * PEEK (108) 

63380 RETURN 

63390 29 = 29 + PEEK (29 * 2) ♦ 256 * PEEK (29 + 3): RETLI 
RN 

63400 PRINT CHR* (21): CHR* (22): 

63410 IF (24) THEN PRINT "7":: RETURN 

63420 IF (25) THEN PRINT "*"; 

63430 RETURN 

63440 28 = PEEK (109) ♦ 256 * PEEK (110): RETURN 


Potete creare un file di EXEC ag¬ 
giungendo al listato 1 la seguente li¬ 
nea: 


1 PRINT CHR$ (4)"OPEN VAR- 
DUMP": PRINT CHR$ (4)"WRI- 
TE VARDUMP":POKE 
33,33:LIST 63.000 - :PRINT CHR$ 
(4)”CLOSE" 


Dopo di ciò basterà che introduciate 
il comando EXEC VARDUMP ogni 
qualvolta vorrete aggiungere al vostro 
programma la routine di riversamento 
delle variabili. 

Un’altra alternativa, per i program¬ 
matori provvisti dell’Apple DOS 3.3 
Toolkit, consiste nell’impiego dell’A- 
PA per: 

1. Hold (trattenere) il programma in 
prova; 

2. Load (caricare) le istruzioni del pro¬ 
gramma di riversamento delle variabi¬ 
li; 

3. Merge (fondere) il programma in 
prova. 

Il secondo passo consiste nel far gi¬ 
rare il programma in prova. Potreste 
interrompere la sua esecuzione in vari 
punti opportuni per visualizzare river¬ 
samenti di variabili. Per esempio po¬ 
treste visualizzare riversamenti: im¬ 
mediatamente prima che appaiano i 
sintomi di errore, dopo che si sono 
presentati, quando il programma salta 
in aria, alla fine di ogni iterazione nel 
corso di un lungo loop di istruzioni, 
oppure prima e dopo calcoli critici e 
complessi. 

Il punto importante è che il pro¬ 
gramma in prova deve essere fatto gi¬ 
rare in combinazione con il program¬ 
ma di riversamento delle variabili. 

Il terzo passo consiste nel far partire 
l’Apple con l’istruzione 63000, l’inizio 
della routine di riversamento delle va¬ 
riabili. Potete fare anche questo in di¬ 
versi modi. Quello più semplice, dopo 
aver arrestato il programma, consiste 
nel dare il comando immediato GO¬ 
TO 63000. 

Potreste anche inserire l’istruzione 
ONERR GOTO 63000 nel program¬ 
ma, per avere la visualizzazione auto¬ 
matica di un riversamento ogni volta 
che capita un errore di Applesoft o di 
DOS. 

Un altro modo molto efficace per 
chiamare i dump di variabili consiste 
nel costellare il programma di istruzio¬ 
ni GOSUB 63000 messe in punti op¬ 
portuni. La risultante serie di istanta¬ 
nee dello stato del programma potrà 
fornirvi una descrizione informativa e 
dinamica del comportamento del pro- 
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gramma. Questa tecnica di debugging, 
combinata con la caratteristica di 
TRACE dell’Applesoft, dovrebbe in¬ 
trappolare anche il più sfuggente degli 
errori. Naturalmente per usare questo 
metodo del GOSUB un RETURN de¬ 
ve sostituire l’istruzione END nella li¬ 
nea 63140. 

Se lo preferite, potete ottenere una 
registrazione stampata dei valori delle 
variabili nel modo normale, abilitando 
la stampante con un’istruzione PR # n 
(dove n è il numero di slot della stam¬ 
pante) prima di dare esecuzione alla 
routine di riversamento. 

Le limitazioni 

Le istruzioni di riversamento delle 
variabili sono numerate a partire dalla 
linea 63000. Pertanto non si possono 
collaudare i programmi che hanno 
questi numeri di linea estremamente 
alti. Ma è raro che i programmi abbia¬ 
no numeri di istruzione in questa fa¬ 
scia. 

Il programma VARIABLE DUMP 
è scritto in Applesoft e pertanto ha 
proprie variabili. I programmi che 
hanno questi stessi numeri di variabile 
non possono essere provati. Per ridur¬ 
re al minimo questa eventualità, il pro¬ 
gramma di riversamento contiene sol¬ 
tanto 10 variabili e utilizza come nomi 
da Z0 a Z9. Per quei pochissimi pro¬ 
grammi che abbiano una o due varia¬ 
bili del genere, potreste cambiare le 
variabili in conflitto con la utility di 
riversamento in variabili tipo Integer, 
vale a dire da Z0% a Z9% (eccettuata 
Z3). 

Come funziona 

Il funzionamento della utility di ri- 
versamento è piuttosto semplice. Pri¬ 
ma essa esplora tutte le variabili sem¬ 
plici e poi tutte le matrici. La variabile 
Z9 contiene l’indirizzo della successi¬ 
va variabile da riversare, mentre Z8 
segna la fine di quella tavola delle va¬ 
riabili. La prima istruzione assicura 
che siano introdotte voci nella tavola 
delle variabili per tutte le variabili del 
programma di riversamento stesso. 
Ciò garantisce che il formato e i punta¬ 
tori di quelle tavole dei dati saranno 
stabili (fissi) durante la loro esplora¬ 
zione da parte della utility di riversa¬ 
mento. 

Di mano in mano che la scansione 
raggiunge ciascuna variabile i primi 
due caratteri del suo nome sono salvati 
in ZI e Z2 mentre riceve temporanea- 
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mente il nuovo nome di Z3. Poi viene 
visualizzato sullo schermo il valore di 
Z3 dopo il nome contenuto in ZI e Z2. 
Completata l’operazione viene ripri¬ 
stinato (con POKE) nella variabile il 
nome esatto, e la scansione continua 
passando alla variabile seguente. 

Il tipo di variabile è indicato dai bit 
più significativi (MSB, ossia most si- 
gnificant bit) dei caratteri ASCII che 
codificano le prime due lettere del no¬ 
me della variabile. Se entrambi gli 
MSB sono 0 la variabile è reale. Se 
entrambi sono 1 la variabile è intera. 
Se l’MSB del primo carattere è uno 0 
ma l’MSB del secondo è un 1 la varia¬ 
bile è una stringa. 

Il programma di utility memorizza 
questi MSB nelle variabili Z4 e Z5, e li 
adopera per stabilire il tipo della varia¬ 
bile che viene esplorata, in modo di 
poter usare il tipo di variabile appro¬ 
priato per Z3 quando ne stampa il va¬ 
lore. 

Con queste nozioni e con l’attenta 
lettura del manuale il funzionamento 
del programma dovrebbe apparire 
sempre più chiaro. La utility è compo¬ 
sta a moduli in varie subroutine per 
rendere più facile la sua comprensione 
e per ridurre al minimo il numero delle 
istruzioni. 

Nella scansione delle variabili sem¬ 
plici il puntatore Z9 è incrementato di 
7 per puntare alla variabile semplice 
seguente. (Per descrivere ogni variabi¬ 
le semplice vengono usati sette byte.) 
Nella scansione delle variabili di ma¬ 
trice il puntatore Z9 è incrementato 
del numero totale dei byte usati per 
memorizzare quella matrice. Questo 
conteggio dei byte è contenuto nel ter¬ 
zo e quarto byte della tavola dei dati di 
quella matrice. 

Dopo che il nome di ogni variabile 
semplice è stato estratto dalla tavola, 
viene controllato per vedere se si tratti 
di una variabile del programma di uti¬ 
lity stesso (da Z0 a Z9), dato che que¬ 
ste variabili sono immagazzinate nella 
stessa tavola di dati con le variabili del 
programma in prova. Se la variabile 
che viene esplorata è una variabile del 
programma di utility viene semplice- 
mente saltata. Viene controllato an¬ 
che il numero di dimensioni di ciascu¬ 
na variabile di matrice (nel quinto byte 
della sua tavola dei dati). Se è maggio¬ 
re di 1 la variabile di matrice viene 
saltata. 


Questo programma è disponibile su 
dischetto. L’elenco, i prezzi e le 
modalitàd’ordinedi questo edegli altri 
dischetti disponibili sono riportati nella 
rubrica Disk Service. 

-V 



Solitudine. 

Solitudine è possedere un computer e non usarlo... 
perchè mancano i programmi o l’assistenza tecnica 

n nli arf'PQQfifi n 

No! Noi non vendiamo solo computers. 

Ma mettiamo a disposizione tutte le risorse che sol¬ 
tanto una grande organizzazione può offrire. Questo 
è il segreto della nostra continua affermazione. 

No! Noi non vendiamo solo computers. 


■ Via Nizza, 48/50/52 T. 06/844.84.18 

■ Via Nizza, 26/28/30/32 1 06/844.11.36 

■ Via Soana, 24/26/28 T. 06/759.15.44 

■ Via P. Fiscali, 257/257a/257bT. 06/811.02.43 

■ Via 0. Majorana, 149/153/155 (pros.aper.) 

■ Ass. Tee.: ViaTerni, 86/86a/86b T. 06/757.89.36 


UH Computer 
““V Center 


OOOQ 


all’altezza dei tuoi problemi. Sempre. 
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• Animation Toolkit 


Mette a disposizione una serie funzioni e di utility grafi¬ 
che che consentono, a chi desidera programmare degli 
effetti di animazione su Macintosh, di costruirsi tutti i 
fotogrammi digitali e successivamente di simulare Y anima¬ 
zione. Per utilizzare il mouse e la grafica con maggiore 
facilità, il programma è supportato da una serie di funzioni 
accessorie. Distribuito da Bits & Bytes a lire 154.780. 



• Ready Set Go! 

Si propone di risolvere, in modo semplice ed efficace, i 
problemi di chi deve comporre delle pagine di tipo giorna¬ 
listico. Con questo strumento è possibile formattare op¬ 
portunamente sia il testo, definendo la struttura della pagi¬ 
na, la dimensione dei caratteri e le fonti, sia la parte 
grafica, spostando le figure nelle posizioni desiderate, mo¬ 
dellandole, ingrandendole e ritagliandole fino a ottenere il 
risultato desiderato. È possibile organizzare le figure in un 
archivio su disco per ripescarle e modificarle all’occorren¬ 
za. Il testo può essere inserito direttamente o incollato da 
applicazioni come Mac Write o MS Word e può venire 



giustificato secondo vari criteri. Le pagine di Ready Set 
Go! possono essere stampate sia con l’ImageWriter che 
con la Laser Printer se si desidera una qualità di stampa 
superiore. Il programma è distribuito da Paolini a lire 
411.820. 


• ExpertLogo 

ExpertLogo è la prima versione del Logo compilata. Per 
questo risulta notevolmente più veloce delle altre. Oltre 
alla maggiore velocità, questo programma unisce l’estre¬ 
ma facilità d’uso propria di un linguaggio didattico come il 
Logo, con le potenzialità del Mac. Grazie alle finestre 
multiple, ai menù estensibili e alla possibilità di sopportare 
un uso intensivo del mouse, questo compilatore Logo può 
senz’altro competere con altri linguaggi di programmazio¬ 
ne più avanzati ed evoluti. Il programma è distrubuito da 
Bits & Bytes a lire 431.000. 



• MacAdvantage-UCSD 
Pascal 

L’UCSD è la versione elaborata dall’università di San 
Diego del linguaggio di programmazione Pascal. Questo 
programma consente di costruire il software in UCSD 
Pascal e di farlo girare sotto il sistema operativo di Macin¬ 
tosh. Questa è tutta la serie di strumenti e di utility che 
MacAdvantage mette a disposizione per definire le appli¬ 
cazioni: 

• Editor per scrivere e modificare il programma sorgente 
Pascal, memorizzato come file di caratteri ASCII. 

• Compilatore UCSD Pascal che compila il sorgente e 
genera il programma oggetto direttamente eseguibile sotto 
il finder e che tra l’altro permette di accedere alle routine 
della ROM di Macintosh. 

• Debugger che viene fornito in tipologia simbolica. 

• Rmaker, cioè un compilatore delle risorse. 

• Librarian che consente di creare e di gestire le librerie di 
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procedure utilizzate nei programmi Pascal. 

• Set Options serve per definire i file contenenti la P—ma¬ 
chine e la libreria Runtime e per sovrintendere all’esecu¬ 
zione del debugger e alle librerie a cui fa riferimento il 
programma. 

Distribuito da Apple Computer a lire 826.000. 



• Dics 

DICS (Didactic ICon Shell) consente una facile intera¬ 
zione con il sistema operativo UNIX. L’interfaccia uomo 
macchina è come di consueto, per il Mac, gestita per mezzo 
di icone e quindi all’utente non è richiesta la conoscenza di 
nessun linguaggio speciale di programmazione. Tuttavia il 
programma mette a disposizione dell’utente tutte le infor¬ 
mazioni, gli oggetti e soprattutto le funzionalità del file 
System di Unix. Esistono due possibili configurazioni del 
programma: in quella di base, DICS agisce sul file System 
di una macchina Unix. È però disponibile anche una ver¬ 
sione in grado di operare su una rete di macchine Unix, 
collegate via LAN o via RS 232, restituendo all’utente una 
visione unificata di tutto il sistema. Il programma è distri¬ 
buito dalla List, il prezzo dipende dalle dimensioni del 
sistema che sopporta la rete e può andare da un minimo di 
500.000 a un massimo di 900.000 lire. 


• Pagine Gialle Elettroniche 

È un programma per gestire una particolare trasmissio¬ 
ne di dati, cioè consente di accedere in modo automatico 
(auto—cali) o semiautomatico alla banca dati delle pagine 
gialle (SEAT), sia attraverso un accoppiatore acustico, sia 
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1ND= 68, U. ROMA CAP=55041 

TEL= 0584/989127 

C0M= CAMAI ORE SIG=LU 

CAT= 33061 ESPORTATORI IMPORTATORI 
—RIM=AZI/CTG —AGG. 30/10/84 

COMMERCIO ALL'INGROSSO DI 
PRODOTTI CASEARI. 

-AZIENDA - 

ATT IUITA': C0MMERCIO ALL'INGR0SS0, 
DISTRIBUZIONE, IMPORT ED EXPORT 
DI FORMAGGI, BURRO E LATTICINI 
NAZIONALI ED ESTER I. 

CONSEGNA A NOSTRO MEZZO, 

PER TIPI E DIMENSIONI DIGITARE 


via modem. Questa banca dati mette a disposizione, prati¬ 
camente in tempo reale, i dati anagrafici di 700.000 opera¬ 
tori economici, più una serie di informazioni tecnico— 
commerciali per circa 100.000 di essi. Le procedure per 
interrogare la banca dati, quindi per ottenere ciò che si 
desidera, fanno uso del mouse, mentre il linguaggio utiliz¬ 
zato è molto facile da apprendere perché la sintassi è tutta 
in italiano. Le Pagine Gialle Elettroniche sono distribuite 
da Sarin a lire 177.000. 


• Mac Plot 

È la soluzione ideale per chi desidera utilizzare una 
periferica di stampa a colori. Mac Plot consente di gestire 
in modo efficace il plotter, attraverso l’uso di più penne 
(nei formati A4 e B3), definendo con la massima libertà i 
colori che si intendono usare, associando un colore a ogni 
tracciato (pattern). Il programma è distribuito da Easy 
Byte a lire 472.000. 



• Aztec C 

Si tratta di un ambiente di sviluppo estremamente po¬ 
tente di programmi in linguaggio C. Il software sviluppato 
con questo sistema gira sotto tre ambienti diversi: Unix, il 
Finder e un terzo ambiente misto tra i primi due. È uno 
strumento molto efficace poiché consente di accedere alle 
routine speciali della ROM (ToolBox). Il compilatore ade¬ 
risce allo standard di linguaggio "C" descritto sul libro "The 
C Language" di Kernighan & Ritchie, a eccezione del 
modo in cui vengono gestiti i bit—field. Il programma è 
distribuito dalla Cominform a lire 1.416.000. 


• PardoMac 

È un gestionale realizzato per risolvere i problemi conta¬ 
bili dell’azienda. Sebbene il nucleo centrale del program¬ 
ma sia quello utilizzato per il software dell’ Apple //, è stata 
notevolmente migliorata l’interfaccia utente, per consenti¬ 
re una maggiore facilità d’uso unitamente a una maggiore 
eleganza formale. Durante l’inserimento della primanota 
da tastiera viene immediatamente effettuato un controllo 
sui dati di input per verificare la quadratura; è possibile 
effettuare delle interrogazioni a video su conti e sottocon¬ 
ti, situazioni cliente/fornitore o su statistiche di partite 
pareggiate, anche durante lo svolgimento di altre opera¬ 
zioni. Viene effettuata la generazione automatica dei mo- 
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é File Composizione Moduli Grafici Caratteri Stile Stampa 

Uerdi Rnnibale 


Completamente in italiano, 
facilissimo da usare, 
totalmente integrato. 
Per archiviare esattamente 
come avviene con 
i classificatori tradizionali. 
Per predisporre carte 
intestate esattamente come 
avviene nelle tipografie. 
Per stampare lettere 
personalizzate senza fatica. 


Per impostare fatture in cui 
basta inserire le quantità 
vendute e i prezzi unitari 
per ottenere i relativi totali. 
Per stampare e mettere 
nell'ordine desiderato 
le etichette degli indirizzi... 















































































THE OFFICE SYSTEM FOR THE MACINTOSH * 

in italiano 


Un programma per il tuo macintosh 
da provare subito. 

Compralo! Oppure ordina il Demo. 
Siamo sicuri che ti convincerà. 





UÌIHHHJa® D“©SP)[Mi 


¥ 


□ Sì, desidero acquistare My Office. Scelgo la seguente formula di 
pagamento: 

§8 □ Accludo assegno non trasferibile di lire 295mila (Iva e spese 
di spedizione comprese) intestato a Editronica srl. 

□ Accludo ricevuta di versamento su conto corrente postale n, 
19740208 intestato a Editronica srl, di lire 295mila (Iva e 
spese di spedizione comprese). 


□ Sì, desidero provare My Office. Speditemi il dischetto Demo al 
prezzo di lire 25mila (Iva e spese di spedizione comprese). Resta 
inteso che se acquisterò poi il programma tale importo mi verrà 
scontato sul prezzo d’acquisto, e potrò quindi ricevere My Office al 
prezzo di lire 270mila anziché 295mila. Scelgo la seguente formula 
di pagamento: 

I Q Accludo assegno non trasferibile di lire 25mila (Iva e spese 
di spedizione comprese) intestato a Editronica srl. 

□ Accludo ricevuta di versamento su conto corrente postale n. 
19740208 intestato a Editronica srl, di lire 25mila (Iva e 
spese di spedizione comprese). 




Nome e Cognome 


Indirizzo.Cap 

Città.Prov 



Ritagliare e spedire in busta chiusa a: Editronica srl, 
Corso Monforte 39, 20122 Milano. 
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vimenti contabili per l’apertura e la chiusura di bilancio e 
per le registrazioni dell’IVA. È possibile richiedere l’e¬ 
stratto conto a partite aperte e/o scadute e la stampa di 
ogni genere di documento previsto dalle norme di legge 
vigenti. PardoMac è distribuito da Easy Byte a lire 
1 . 000 . 000 . 


• 68000 Development System 

Il Macintosh 68000 Assembler/Debugger (MDS 68000) 
è un ambiente di sviluppo per applicazioni in assembler. Il 
programma, completo di debugger interattivo, dispone 
delle seguenti utility: 

• ED IT text editor per la creazione dei programmi sorgen¬ 
ti. 

• ASM assemblatore. 

• LINK linker per la costruzione dell’applicativo. 

• EXEC realizza una integrazione automatica tra le fun¬ 
zioni di assembler, linker la risorsa dell’applicativo. 

• RMAKER compilatore delle risorse. 

• PACKSYMS compatta un file symbol. 

• MACDB NUBS contiene i debugger funzionanti, sotto 
uno stesso sistema, in modo concorrente all’applicativo. 

• DEBUGGER Contiene i debugger che utilizzano due 
sistemi. 

• SAMPLE PROGRAMS contiene alcuni esempi di ap¬ 
plicazioni. 

• TRAP FILES contiene l’associazione nome-indirizzo 
per le trap di sistema. 

• EQU FILES contiene le tavole di equates. 

• D FILES contiene la versione compatta dei trap file e 
degli equ file. 

MDS 68000 è distribuito da Apple Computer a lire 
230100. 


(fc File Edlt Search Format Font Size Transfer 
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; File Uindoui.Asm 

; Macintosh 68000 Development System -- Programming Example 

; Uritten by Marc Russe!1 Benioff and Ernie Beernink 
; Spiritual guidance from Dan Cochran 

; This application displays a u) i ndoiu within which you can enter and editY 
; text. Program control is through three menus. thè Apple menu, thè Fi le-*' 

, menu, and thè Edit menu 

; The Apple menu has thè standard desk accessories and an About feature, 

; The File menu lets you quit thè application. 

; The Edit menu lets you cut, copy, paste, and c1ear thè text in thè window 

; or in thè desk accessories. Undo is prouided for desk accesories only. 

; Command key equivalents for undo, cut, copy, and paste are provided. 

; Cutting and pasting betiueen thè application and thè desk accessories is 
; not supported. This requires use of thè Scrap Manager. 

; This program requires thè use of a resource file called "Ulindoiu.Rsrc" 

; Uindoui.Rsrc is created from "Windolii. A" us i ng RMaker 
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guarda la stampa, è possibile effettuare sia copie del video, 
sia delle stampe ordinate e selezionate degli archivi. Distri¬ 
buito da J. Soft a lire 278.000. 


• Page Maker 


Questo software realizza una particolare integrazione 
tra grafica e word processing. E stato progettato per essere 
lo strumento ideale per chi ha necessità di fare largo uso di 
comunicazioni scritte e desidera creare pagine di testo 
insieme a sofisticati elementi grafici di contorno, svinco¬ 
landosi dai costi di un servizio esterno di fotocomposizio¬ 
ne. Tecnicamente il programma consiste in una tavola 
elettronica di layout dove è possibile aggregare elementi 
testuali e grafici, manipolandoli e formattandoli per otte¬ 
nere il prodotto pronto per la riproduzione . Le applicazio¬ 
ni di questo strumento sono molto varie e innumerevoli: 
documentazioni tecniche, relazioni, riviste aziendali, noti¬ 
ziari ecc. Page Maker è distribuito da Apple Computer a 
circa un milione e mezzo di lire. 


nrctìiuio Comp. Strumenti Pagina Testo Linee 
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luill and ink. That vas folloved by 

justabout 10 years ago, by vord proi 
entering thè age of desktop publishii^ 
write, design, and prìnt documenta th 
aver leavtng your office. 

This special issue of Tomorro- 
look at publishing yesterday and loda 
future. 

YESTERDAY... 


By thè lèthcentury, thè press ha 'y////////\ 
noted — "lost thè sheen of novelty v 
of respectability. " A scholar named l 
ithat. Issuing important ’vorks in Gre 
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ipromote and preserve thè spirito! thè classics. Uhknovnto 
ihim, he had started a revolution in publishing. 

. m . 


• Store 

Si propone di gestire in modo chiaro e veloce un magaz¬ 
zino di abbigliamento. E possibile organizzare il magazzi¬ 
no in relazione ai codici delle etichette di uscita, in modo 
tale da poter stampare automaticamente le etichette dei 
singoli capi. Da una parte permette di amministrare le 
scorte nel magazzino, consentendo di conoscere in qualsia¬ 
si momento la giacenza, il consegnato e il venduto. Dall’al¬ 
tra è in grado di fare ordinazioni e ricerche per tipo e per 
fornitore, sia su tutto l’archivio, sia in un particolare sot¬ 
toinsieme. Store è distribuito da Master. 


• Memo 

Lo scopo di questo programma è di ottimizzare il siste¬ 
ma di gestione degli impegni di una o più persone, fino a un 
massimo di 20. È in grado di archiviare e di ripescare gli 
appuntamenti e gli impegni su più agende contemporanea¬ 
mente e di presentarle sul video per pianificare le proprie 
attività ed eventualmente per effettuare dei controlli. Ol¬ 
tre a questo è possibile fare delle ricerche a chiave di ogni 
genere nell’archivio appuntamenti, trattando tutte le 
agende come un database. Come supporto a questa strut¬ 
tura è disponibile un completo indirizzario in cui può tor¬ 
nare utile salvare preziose informazioni. Per quanto ri- 


• Mac Law 

Gestisce due aspetti dell’attività di uno studio legale: da 
una parte pianifica le pratiche giudiziarie, dall’altra elabo¬ 
ra e archivia tutto ciò che è connesso alla contabilità. Per 
l’utente sono disponibili due grandi sezioni: nella prima 
vengono riportate tutte le annotazioni di carattere econo¬ 
mico come le spese, le ritenute d’acconto, l’IVA ecc, nella 
seconda vengono archiviate le varie pratiche che consento¬ 
no di accedere ai dossier della clientela. La gestione del 
materiale è molto flessibile, infatti, ad esempio, per l’out¬ 
put di stampa è possibile effettuare una selezione molto 
precisa e dettagliata, come pure ottenere i totali a una 

























































































Kroasnews 


certa data. Il programma procede automaticamente al ri¬ 
calcolo dei valori parziali, individuati mediante interroga¬ 
zioni precedenti e consente di organizzare un massimo di 
90 voci diverse. Mac Law è distribuito da Caribel a lire 
708.000. 
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Pratica Completa 


Data 

Descrizione 
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ESECUZIONE MOBILIARE PER RECUPERO CREDITO LIRE 350.000 


• OmniReader 

È uno strumento estremamente utile per chi vuole archi¬ 
viare una grande quantità di documenti, piuttosto lunghi, 
senza dover perdere tempo in noiose digitazioni. Essen¬ 
zialmente l’hardware è costituito da un lettore ottico di 
caratteri supportato da una guida laterale e da un righel¬ 
lo-guida che consentono al lettore ottico di scorrere il 
testo riga per riga. Una volta introdotto, il documento 
viene archiviato in un file Mac Write. Distribuito da Paoli- 
ni a lire 2.006.000. 


• Mac Terminal 

Distribuito dalla Apple Computer, è il software che 
realizza la comunicazione di dati sia con ambienti IBM che 
utilizzano il protocollo 3270, sia con ambienti Digital o con 
qualsiasi altro sistema di trasmissione che utilizzi il proto¬ 
collo TTY. Come ogni programma per Mac anche questo 
realizza tutte le potenzialità della macchina in questo set¬ 
tore, insieme a una estrema praticità e semplicità d’uso. 
Ecco quali sono le principale caratteristiche del program¬ 
ma: 

• Protocolli già codificati: Digital VT 52, Digital VT 100, 
IBM 3270 e TTY 

• Completa programmabilità del baud-rate. 



• Programmabilità delle caratteristiche di trasferimento. 

• Personalizzazione della codifica del set di caratteri. 

• Opzione di auto-diai. 

• Funzioni di taglia e incolla sui file inquiry. 

• Capacità di inviare documenti a Mac Write. 

• Possibilità di salvare su disco la parte di documento che 
scorre sul video. 

Il programma è distribuito da Apple Computer a lire 
306.800. 


• Pixel Art 

Si tratta del monitor a colori per il Macintosh. È una 
periferica molto sofisticata, capace di esaltare al massimo 
le prestazioni dell’unità centrale. Sono disponibili fino a 16 
milioni di colori con tonalità differenti, selezionabili molto 
semplicemente, com’è nello stile di Macintosh. È possibile 
elaborare soluzioni grafiche estremamente complesse, ser¬ 
vendosi del mouse, utilizzando il software già disponibile 
sul mercato, come ad esempio Mac Paint. Pixel Art è 
distribuito da Paolini a lire 15.222.000. 


• Mac Tablet 

La tavoletta grafica è uno strumento fondamentale per 
poter sfruttare al massimo le capacità grafiche di Macin¬ 
tosh. Questa periferica grafica, che va utilizzata insieme a 
Mac Paint, è costituita da una tavoletta da disegno e da una 
penna elettronica. Con Mac Tablet si ha il duplice vantag¬ 
gio di poter riprodurre fedelmente disegni preesistenti 
come piantine, planimetrie, ecc, seguendone semplice- 
mente i contorni e inoltre si ha disposizione uno strumento 
molto più sensibile e preciso per eseguire disegni elettroni¬ 
ci a mano libera. Il programma è distribuito da Paolini a 
lire 1.711.000. 



Per maggiori informazioni sui programmi descritti in questo articolo^ 

ecco gli indirizzi dei distributori: 

APPLE COMPUTER Via Bovio 5 - Reggio Emilia - Tel. 0522/32643 
BITS & BYTES Via S. Francesco riessisi 8 - Milano - Tel. 02/8376207 
CARIBEL Via Pungi lupo 31 - Pisa - Tel. 050/575440 
CÙMINFOR Corso Francia 30 - Torino - Tel. 011/740547 
EASY BYTE Via E. Toti-Gall. Cisa - Latina - Tel. 0773/48801 
J. SOR Via Rossell ini 12 - Milano - Tel. 02/6888228 
LIST Piazza Mazzini 6 - Pisa - Tel. 050/44023 
MASTER Via 6. Uberti 12 - Milano 
PAOLINI Via Ostiense 48 - Roma - Tel. 06/5755006 
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• Programmi 
didattici, professionali 

e giochi 

• Modulistica 

continua 

• Accessori 
per Gomputers 
e Stampanti 

• Noleggio sul posto 
di Macintosh 512 
e LaserWriter 
per stampa su carta 
comune, 
cartoncino e lucido 




• Libri e riviste 
specializzate 
nazionali ed estere 

• Tappeti 
antistatici 3M 

• Assistenza 
tecnica hardware 
e software 

• Corsi introduttivi 
e specialistici 

• Collegamento a 
Banche dati e Pagim 
Gialle Elettroniche 


SMALL BUSINESS COMPUTERS s .r. 


via Settembrini ang. via Vitruvio 38 - 20124 Milano 
telefono (02) - 6705652/6705661 






















Eccoci alla seconda tappa del nostro viaggio nel mondo m. ^3 

dell’altissima risoluzione per Apple//e con scheda 80 apre 77* € 

colonne 0 Ile. Questo articolo esplora l’animazione sullo APPLE //c 
schermo delle figure a blocco. Un driver in linguaggio 
macchina e vari programmi dimostrativi illustrano il 
meccanismo del sistema. 


Sempre più in alto 



N ell’ultimo numero di Applicando 
abbiamo posto tutte le basi ne¬ 
cessarie per la doppia Hi—Res; adesso 
metteremo a punto altre routine per il 
vostro DHR driver, e cominceremo ad 
addentrarci in qualche tecnica d’ani¬ 
mazione. 

Se avete già condotto qualche espe¬ 
rimento di persona, avrete probabil¬ 
mente constatato che nella doppia 
Hi-Res c’è una gran quantità di po¬ 
tenziale; tuttavia l’animazione grafica 
in Applesoft è piuttosto macchinosa e 
lenta. Per evitare le peculiarità della 
doppia alta risoluzione le routine che 
realizzeremo gestiranno automatica- 
mente per voi tutte le manovre dei soft 
switch, evitandovi così di dovervi 
preoccupare di colonne, duplicazione 
d’indirizzi e simili. 

Le figure a blocco 
in doppia Hi-Res 

In figura 1 è rappresentata la prima 
immagine con cui lavorare, un’astro¬ 
nave aliena definita in modo tale da 
funzionare sullo schermo della doppia 
alta risoluzione. 

Notate che la figura è larga sei byte- 
/colonna, ma comprende solo tre indi¬ 
rizzi. Nell’alta risoluzione normale a 
280 punti la larghezza di una figura a 
blocco era definita dal numero dei by¬ 
te orizzontali che essa occupava. Nelle 
figure a blocco della doppia alta risolu¬ 
zione la larghezza è definita dal nume¬ 
ro degli indirizzi che occupa; perciò 
tutte le figure della doppia Hi-Res 
saranno larghe un numero pari di co¬ 
lonne. Il disegno visibile nella figura 1 
ha una larghezza di 3 e un’altezza di 
14. Le dimensioni totali della figura 
sono 3 * 14 * 2 = 84 byte. 

La larghezza della figura è in termi¬ 
ni d’indirizzi (anziché di byte) per evi¬ 


tare la necessità di controllare costan¬ 
temente ogni byte di dati per vedere in 
quale posizione debba essere imposta¬ 
to il soft switch della pagina 2. Nell’at¬ 
tuale configurazione le nostre figure in 
doppia Hi—Res richiederanno un nu¬ 
mero doppio di byte di quello che ri¬ 
chiederebbero le figure delle stesse di¬ 
mensioni nel modo 280. Questo vuol 
già dire che le routine di disegno do¬ 
vranno fare un lavoro doppio, ed è 
bene quindi evitare quanta più attività 
di controllo è possibile per conservare 
la massima velocità. Istituendo una 
definizione delle figure e un formato 
dei dati di tipo costante non occorre 
alcuna attività di controllo. 

La definizione 
di una figura a blocco 

Ognuna delle figure sarà definita 
con cinque valori. 


Numero della figura (SHape NUM- 
ber) (POKE 251,SHNUM) 

Il primo di questi cinque valori è un 
numero, che viene immagazzinato 
nella locazione di memoria 251 ($FB). 
Questo valore dirà alle nostre routine 
di disegno dove trovare i dati che defi¬ 


niscono la figura. Nel modo normale 
di immagazzinamento della figura in 
memoria si comincia alla sommità del¬ 
la memoria disponibile (appena sotto 
il driver) e si costruisce verso il basso 
con l’aggiunta di ogni figura. Ognuna 
delle figure comincerà esattamente al 
byte di una pagina di memoria, vale a 
dire a $7500, $8A00, $9000 e così via. 
Ci sono anche modi in cui si possono 
immagazzinare molteplici figure su 
una pagina di memoria, ma di questo 
parleremo più avanti. Se la vostra figu¬ 
ra comincia al primo byte di una pagi¬ 
na di memoria potete lasciare che de¬ 
bordi nella pagina seguente: quindi 
non c’è alcuna lunghezza massima del¬ 
la figura di cui dovete preoccuparvi. 
Per determinare il giusto numero della 
figura, prendete le prime due cifre del¬ 
l’indirizzo iniziale esadecimale e con¬ 
vertitele nel loro valore decimale. Per 
esempio di una figura messa in memo¬ 
ria a partire da $9000 le prime due cifre 
di $9000 sono $90, e dato che l’equiva¬ 
lente decimale di $90 è 144 il numero 
della figura sarà 144. 


Sommità verticale (Vertical Top), 
(POKE 252,VT) 

Il valore di VT sarà la coordinata Y più 
alta occupata dalla figura (0-191). 
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80 

80 

94C0- 

28 

28 

28 

28 

28 

28 

28 

28 

94C8- 

A8 

A8 

A8 

A8 

A8 

A8 

A8 

A8 

9400- 

28 

28 

28 

28 

28 

28 

28 

28 

9408- 

A8 

A8 

A8 

A8 

A8 

A8 

A8 

A8 

94E0- 

28 

28 

28 

28 

28 

28 

28 

28 

94E8- 

A8 

A8 

A8 

A8 

A8 

A8 

A8 

A8 

94F0- 

28 

28 

28 

28 

28 

28 

28 

28 

94F8- 

A8 

A8 

A8 

A8 

A8 

A8 

A8 

A8 

9500- 

50 

50 

50 

50 

50 

50 

50 

50 

9508- 

00 

00 

00 

00 

00 

00 

00 

00 

9510- 

50 

50 

50 

50 

50 

50 

50 

50 

9518- 

00 

00 

00 

00 

00 

00 

00 

00 

9520- 

50 

50 

50 

50 

50 

50 

50 

50 

9528- 

DO 

00 

DO 

00 

00 

00 

00 

DO 

9530- 

50 

50 

50 

50 

50 

50 

50 

50 

9538- 

00 

00 

DO 

DO 

00 

00 

00 

00 

9540- 

20 

24 

28 

2C 

30 

34 

38 

3C 

9548- 

20 

24 

28 

2C 

30 

34 

38 

3C 

9550- 

21 

25 

29 

20 

31 

35 

39 

30 

9558- 

21 

25 

29 

20 

31 

35 

39 

3D 

9560- 

22 

26 

2A 

2E 

32 

36 

3A 

3E 

9568- 

22 

26 

2A 

2E 

32 

36 

3A 

3E 

9570- 

23 

27 

2B 

2F 

33 

37 

3B 

3F 

9578- 

23 

27 

28 

2F 

33 

37 

38 

3F 

9580- 

20 

24 

28 

2C 

30 

34 

38 

3C 

9588- 

20 

24 

28 

2C 

30 

34 

38 

3C 

9590- 

21 

25 

29 

2D 

31 

35 

39 

30 

9598- 

21 

25 

29 

20 

31 

35 

39 

30 

95A0- 

22 

26 

2A 

2E 

32 

36 

3A 

3E 

95A8- 

22 

26 

2A 

2E 

32 

36 

3A 

3E 

9580- 

23 

27 

28 

2F 

33 

37 

3B 

3F 

9588- 

23 

27 

2B 

2F 

33 

37 

3B 

3F 

95C0- 

20 

24 

28 

2C 

30 

34 

38 

3C 

95C8- 

20 

24 

28 

2C 

30 

34 

38 

3C 

9500- 

21 

25 

29 

2D 

31 

35 

39 

30 

9508- 

21 

25 

29 

2D 

31 

35 

39 

30 

95E0- 

22 

26 

2A 

2E 

32 

36 

3A 

3E 

95E8- 

22 

26 

2A 

2E 

32 

36 

3A 

3E 

95F0- 

23 

27 

2B 

2F 

33 

37 

3B 

3F 

95F8- 

23 

27 

28 

2F 

33 

37 

38 

3F 


Base verticale (Vertical Bottom), 
(POKE 253 ,VB) 

Il valore di VB sarà la coordinata Y 
più bassa occupata dalla figura 
(0-191). 


Destra orizzontale (Horizontal 
Right), (POKE 254,HR) 

Il valore di HR sarà l’offset d’indirizzo 
più a destra occupato dalla figura 
(0-39). 


Sinistra orizzontale (Horizontal Left), 
(POKE 255,HL) 

Il valore di HL rappresenterà l’offset 
d’indirizzo più a sinistra occupato dal¬ 
la figura (0-39). 


Ogni volta che manipolerete la figu¬ 
ra sullo schermo dovrete specificare i 
valori VT, VB, HR e HL della figura 
per definire la porzione dello schermo 
nella quale le routine di animazione 
dovranno svolgere le loro attività. 
Userete il valore di SHNUM con qual¬ 
siasi routine che utilizzi la tavola di 
definizione delle figure immagazzina¬ 
ta in memoria. 

Guardando la figura 1 potete notare 
che gli attuali valori di VT, VB, HR e 
HL della figura sono rispettivamente 
0, 13, 2e0. 

Checos'èuna 
figura a blocco? 

Una figura a blocco è un "blocco" di 
byte dello schermo ad alta risoluzione 
che è delimitato in alto e in basso da 
VT e VB, e ai lati da HR e HL. Una 
tavola delle figure a blocco è una strin¬ 
ga sequenziale di byte di dati (nel no¬ 


stro esempio ce ne sono 84) che contie¬ 
ne le configurazioni di bit per ciascun 
byte presente nel rettangolo. 

Le routine di animazione e di dise¬ 
gno percorrono la tavola, elemento 
per elemento, e mettono l’opportuno 
schema di bit negli opportuni byte 
Hi-Res all’interno del rettangolo de¬ 
finito. La tavola delle figure non con¬ 
tiene alcuna informazione che indichi 
dove comincia o dove finisce; pertanto 
le routine di animazione continueran¬ 
no a manipolare i byte di schermo fino 
a quando avranno trattato tutti i byte 
presenti nei confini di VT, VB, HR e 
HL. 

Se le dimensioni da voi fissate per 
definire il rettangolo non sono confor¬ 
mi ai dati della tavola delle figure (os¬ 
sia al modo in cui la tavola è stata 
creata) la figura sarà incompleta o di¬ 
storta. Noterete che molti dei byte in¬ 
terni al rettangolo non hanno nulla a 
che fare con la figura vera e propria, e 
fanno anzi parte dello sfondo; tutta¬ 
via, dato che rientrano nella zona d’in¬ 
fluenza della figura, sono parti neces¬ 
sarie della figura a blocco. 

Le figure a blocco, comunque, sono 
probabilmente le più facili da creare. 
Anziché dover calcolare una quantità 
di valori di dati o di movimenti di vet¬ 
tore da mettere in ogni byte, tutto ciò 
che dovete fare è disegnare la figura 
sullo schermo, usando il metodo che 
preferite, e poi usare una routine che è 
incorporata nel driver, la quale tradur¬ 
rà il disegno nella tavola di figure a 
blocco occorrente. 

Se intendete utilizzare il colore nelle 
figure, fate attenzione a usare i giusti 
set di quattro punti per colore. La figu¬ 
ra dovrà apparire sullo schermo del¬ 
l’alta risoluzione normale larga il dop¬ 
pio di quanto sarà quando verrà poi 
utilizzata sullo schermo della doppia 
alta risoluzione. 
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FIGURA 1: L’ASTRONAVE ALIENA 
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FIGURA 2: METODI DI ELABORAZIONE DELLA FIGURA 
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Listato 1 


SOURCE FILE: SCAN ROUTINE 
0000: 1 * SCAN ROUTINE 

0000: 2 « (C) 1985 BY APPLICANDO 4 MICR0SPARC INC. 

0000: 3 * 

0000: 4 * TOOL KIT ASSEMBLER 

0000; 5 * 

- NEXT OBJECT FILE NAME IS SCAN ROUTINE.OBJO 


93DA: 



6 


ORG 

$93DA 



00FC: 



7 

VT 

EQU 

$FC 

*« 

DECIMAL 252 

00FD: 



8 

VB 

EQU 

$FD 

** 

DECIMAL 253 

Q0FE: 



9 

HR 

EQU 

$FE 

** 

DECIMAL 254 

00FF: 



10 

HL 

EQU 

$FF 

#* 

DECIMAL 255 

0026: 



11 

HBASL 

EQU 

$26 

«« 

DECIMAL 38 (SCREEN BASE 

0027: 



12 

HBASH 

EQU 

$27 

** 

DECIMAL 39 ADDRESS) 

0006: 



13 

YO 

EQU 

$6 

** 

DECIMAL 6 

00FA: 



14 

BASL 

EQU 

$FA 

** 

DECIMAL 250 (TABLE BASE 

Q0FB: 



15 

BASH 

EQU 

$FB 

** 

DECIMAL 251 ADDRESS) 

9464: 



16 

YADDR 

EQU 

$9464 

** 

DECIMAL 37988 (READ YTABLE) 

CO 54: 



17 

PAGE 1 

EQU 

$C054 



C055: 



18 

PAGE1X 

EQU 

$C055 



93DA:A9 

00 


19 

SCFN 

LDA 

HO 

*« 

SCAMER CALL 37850 T0 ENTER 

93DC: 85 

FA 


20 


STA 

BASL 

** 

POINT TO START OF TABLE 

93DE:A5 

FD 


21 


LDA 

VB 

** 

6ET B0TT0M Y COORDINATE 

93E0:85 

06 


22 


STA 

Y0 

** 

STORE IN $6 FOR USE BY YADDR 

93E2:20 

64 

94 

23 

LI 

JSR 

YADDR 

** 

RETURNS-L0=HBASL/H1=HBASH 

93E5:A4 

FE 


24 


LDY 

HR 

** 

SET Y-REG T0 RIGHTM0ST BYTE 

93E7:A2 

00 


25 


LDX 

«0 

** 

SET TABLE OFFSET=0 

93E9:8D 

54 

CO 

26 

L2 

STA 

PAGE1 

** 

READ MAIN MEMORY 

93EC:B1 

26 


27 


LDA 

(HBASL),Y ** 

GET SHAPE BYTE FROM SCREEN 

93EE:81 

FA 


28 


STA 

(BASL,X) 

** 

PUT IN SHAPE TABLE 

93F0 :E6 

FA 


29 


INC 

BASL 

** 

POINT TO NEXT TABLE ELEMENT 

?3F2: DO 

02 


30 


BNE 

J1 

** 

IF x 256 BYTES-JUMP 

93F4:E6 

FB 


31 


INC 

BASH 

** 

PAGE 0VERFL0W-G0T0 NEXT PAGE 

93F6:8D 

55 

CO 

32 

J1 

STA 

PAGEIX 

** 

READ AUXILIARY MEMORY 

93F9:B1 

26 


33 


LDA 

(HBASL) ,Y ** 

GET SHAPE BYTE FROM SCREEN 

93FB: 81 

FA 


34 


STA 

(BASL,X) 

** 

PUT IN SHAPE TABLE 

93FD:E6 

FA 


35 


INC 

BASL 

** 

POINT TO NEXT TABLE ELEMENT 

93FF: DO 

02 


36 


BNE 

NC1 

** 

IF x256 BYTES-JUMP 

9401 :E6 

FB 


37 


INC 

BASH 

** 

PAGE 0VERFLQW-G0TQ NEXT PAGE 

9403:88 



38 

NC1 

DEY 


#* 

POINT T0 NEXT BYTE x— 

9404:CO 

FF 


39 


CPY 

#$FF 

*« 

HAS Y-REGISTER REACHED 0 ? 

940ó:FQ 

04 


40 


BEQ 

NXTLN 

** 

YES-GOTO NEXT LINE 

9408 :C4 

FF 


41 


CPY 

HL 

**IS Y-REG1STER >=HL ? 

940A : BO 

DD 


42 


BCS 

L2 

«* 

YES-GET THE NEXT BYTE 

940C:C6 

06 


43 

NXTLN 

DEC 

YO 

** 

MOVE UP TO NEXT LINE 

940E:A5 

06 


44 


LDA 

YO 

** 

GET NEW Y COORDINATE 

9410 :C9 

FF 


45 


CMP 

#$FF 

#* 

MS Y-COORDINATE REACHED 0 ? 

9412 :F0 

04 


46 


BEQ 

RTN 

** 

YES-WE'RE FINI SHED 

9414:C5 

FC 


47 


CMP 

VT 

** 

HAVE WE REACHED VT YET ? 

9416 :B0 

CA 


48 


BCS 

LI 

** 

NO-START THE NEXT LINE 

9418:60 



49 

RTN 

RTS 


** 

DOME-EXIT ROUTINE 


*** SUCCESSFUL ASSEMBLY: NO ERRORS 


Listato 2 


SOURCE FILE: DRAW ROUTINE 







0000 

1 

* DRAW ROUTINE 





0000 

2 * (C) 

1985 BY APPLICANDO 4 MICROSPARC 

INC. 

0000 

3 * 







0000 

4 * TOOL KIT ASSEMBLER 






■ NEXT OBJECT FILE NAME IS 

DRAW ROUTINE.OBJO 



9394 

5 


ORG 

$9394 





00FC 

6 

VT 

EQU 

$FC 

** 

DECIMAL 

252 


00FD 

7 

VB 

EQU 

$FD 

** 

DECIMAL 

253 


00FE 

8 

HR 

EQU 

$FE 

** 

DECIMAL 

254 


00FF 

9 

HL 

EQU 

$FF 

** 

DECI:AL 
DECIMAL 

255 


0026 

10 

HBASL 

EQU 

$26 

#* 

38 

(SCREEN BASE 

0027 

11 

HBASH 

EQU 

$27 

** 

DECIMAL 

39 

ADDRESS) 

0006 

12 

Y0 

EQU 

$6 

** 

DECIMAL 

6 

(TABLE BASE 

OOFA 

13 

BASL 

EQU 

$FA 

** 

DECIMAL 

250 

00FB 

14 

BASH 

EQU 

$FB 

** 

DECIMAL 

252 

ADDRESS 

9464 

15 

YADDR 

EQU 

$9464 

** 

DECIMAL 

37988 (READ YTABLE) 

C054 

16 

PAGE1 

EQU 

$CQ54 





CO 55 

17 

PAGE IX 

EQU 

$CQ55 





9394 

A9 00 18 

DRAW 

LDA 

«0 

** 

CALL 37780 TO ENTER 

9396 

85 FA 19 


STA 

BASL 

«* 

POINT TO START OF TABLE 


Altre routine 
per il DHR driver 

A questo punto sarà un po’ difficile 
tentare una qualsiasi prova di anima¬ 
zione, prima di avere qualche nuova 
routine con cui lavorare, e perciò con¬ 
tinuiamo a costruire il nostro driver 
della doppia alta risoluzione. La prima 
cosa da fare è BLOAD DHR.DRI¬ 
VER, caricando il driver realizzato nel 
precedente articolo (se non l’avete 
presente, guardate il listato 0.5 per 
prendere conoscenza del dump esade- 
cimale, da battere prima di aggiungere 
SCAN e via dicendo). Poi accedete al 
monitor battendo CALL-151, e 
provvedete ad aggiungere qualche 
nuova routine. 

Coloro che non possiedono il Tool Kit 
assembler possono fare riferimento al 
listato 7. Per avere ulteriori informa¬ 
zioni sull’introduzione in memoria dei 
file binari, consultate “Per chi comin¬ 
cia” in questo numero della rivista. 


SCAN $93DA 

La routine SCAN (listato 1) è una del¬ 
le più importanti, in quanto è la parte 
del driver che crea le figure da utilizza¬ 
re. Sua funzione è quella di guardare 
la figura disegnata sullo schermo (me¬ 
diante comandi HPLOT o qualsiasi al¬ 
tro metodo), prendere le configura¬ 
zioni di dati dallo schermo e creare 
una tavola delle figure a blocco. Per 
usare SCAN dovete specificare VT, 
VB, HR e HL, allo scopo di dire a 
SCAN quale area dello schermo dovrà 
impiegare nella creazione della tavola 
delle figure. Dovete anche fare POKE 
251,SHNUM per dire alla routine in 
che punto della memoria volete sia as¬ 
semblata e memorizzata la tavola delle 
figure. 


DRAW $9394 

La routine DRAW (listato 2) è esatta¬ 
mente l’opposto di SCAN. Prende i 
dati dalla tavola delle figure in memo¬ 
ria e mette gli opportuni valori diretta- 
mente sullo schermo della doppia alta 
risoluzione. Ogni volta che la routine 
passa a un nuovo indirizzo dello scher¬ 
mo Hi-Res essa colloca il primo byte 
di dati nella colonna dispari (pagina 1) 
e poi colloca il successivo byte di dati 
nella colonna pari (pagina IX). È lo 
stesso metodo usato da SCAN, 
DRAW e DRAWDN. Per usare 
DRAW occorre prima specificare VT, 
VB, HR e HL per definire in quale 
punto dello schermo dev’essere dise- 
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gnata la figura. Dovete anche fare PO- 
KE 251,SHNUM per dire alla routine 
in quale punto della memoria deve 
trovare la tavola delle figure. 


DRAWDN $934C 

La routine DRAWDN (listato 3) lavo¬ 
ra esattamente come DRAW con la 
differenza che mette i byte di dati sullo 
schermo in un ordine leggermente di¬ 
verso. Questa routine è comoda per 
capovolgere le figure, o per spostare le 
figure dietro altre figure o lo sfondo, o 
da dietro di essi. Anche per usare 
DRAWDN dovrete adoperare 
SHNUM, VT, VB, HR e HL. 


REVDIR $91F8 

Lo scopo di REVDIR (listato 4) è 
quello di invertire fisicamente l’aspet¬ 
to di una figura da sinistra a destra, 
mettendo i byte della tavola delle figu¬ 
re sullo schermo in ordine inverso a 
quello nel quale ne avevate fatto lo 
SCAN. Prima che ciascun byte sia 
messo sullo schermo viene invertita la 
confgurazione di bit dei bit 0-6, di 
modo che la routine cambia non solo 
l’ordine, ma anche i valori che sono 
immagazzinati sullo schermo Hi- 
Res. Il bit 7 è ignorato e automatica- 
mente messo a zero. 

Prima che i bit vengano invertiti il 
byte viene controllato per i valori 0 
(00000000) e 127 (01111111). Notere¬ 
te che la figura esemplificativa ha 59 
degli 84 byte con una di queste due 
configurazioni, cosicché si può rispar¬ 
miare tempo non invertendo i byte 
non necessari. Questa è anche una 
buona ragione per usare HCO- 
LOR=3 quando create le vostre figu¬ 
re, dato che così terrete il bit 7 a zero. 

Ogni volta che questa routine passa 
a un nuovo indirizzo di schermo mette 
il primo byte di dati nella pagina IX (la 
colonna pari) e poi mette il byte di dati 
seguente nella pagina 1 (la colonna 
dispari). Dopo che la figura è invertita 
e messa sullo schermo la figura inverti¬ 
ta viene collocata con un nuovo SCAN 
nella tavola delle figure, di modo che 
la tavola è sempre conforme all’aspet¬ 
to della figura sullo schermo. Anche 
REVIDR è definita con SHNUM, 
VT, VB, HR e HL. 

I metodi di elaborazione della figura 
visibili nella figura 2 illustrano in qual 
modo ognuna delle routine descritte 
sopra elabori i byte di dati che si trova¬ 
no nell’area definita della figura a 
blocco. 

Notate in figura 2 che sia SCAN sia 
DRAW introducono la figura a 


9398:A5 FD 

20 

LDA 

VB 

** 

GET B0TT0M Y-CQ0RTDINATE 

939A:85 06 

21 

STA 

Y0 

#* 

ST0RE IN $6 F0R USE BY YADDR 

939C: 20 64 94 

22 LIA 

JSR 

YADDR 

** 

RETURNS-LO=HBASL/HI=HBASH 

939F:A4 FE 

23 

LDY 

HR 

*# 

SET Y-REG T0 RI6HTM0ST BYTE 

93A1:A2 00 

24 

LDX 

«0 

** 

SET TABLE OFFSET=0 

93A3:A1 FA 

25 L2A 

LDA 

(BASL,X) 

** 

GET SHAPE BYTE FR0M TABLE 

93A5:80 54 CO 

26 

STA 

PAGE1 

«* 

DRAW MAIN MEMORY 

93A8:51 26 

27 

E0R 

(HBASL),Y ** 

MODIFY T0 BACKGROUND 

93AA: 91 26 

28 

STA 

(HBASL),Y ** 

L0AD SHAPE BYTE QN SCREEN 

93AC:E6 FA 

29 

INC 

BASL 

«* 

POINT T0 NEXT TABLE ELEMENT 

93AE:00 02 

30 

BNE 

J1 

** 

IF x256 BYTES JUMP 

93B0:E6 FB 

31 

INC 

BASH 

#* 

PAGE 0VERFLQW-60T0 NEXT PAGE 

9382:A1 FA 

32 J1 

LDA 

(BASL.X) 

#* 

GET SMPE BYTE FR0M TABLE 

93B4:8D 55 CO 

33 

STA 

PAGEIX 

## 

DRAW AUXILIARY MEMORY 

93B7:51 26 

34 

E0R 

<HBASL),Y ** 

M0DIFY BY BACKGROUND 

93B9:91 26 

35 

STA 

(HBASL) Y *« 

L0AD SHAPE BYTE QN SCREEN 

93BB:E6 FA 

36 

INC 

BASL 

** 

P0INT T0 NEXT TABLE ELEMENT 

93BD: DO 02 

37 

BNE 

NC2 

*s 

IF x256 BYTES JUMP 

938F:E6 FB 

38 

INC 

BASH 

** 

PAGE 0VERFL0W-G0T0 NEXT PAGE 

93C1:88 

39 NC2 

DEY 


** 

POINE T0 NEXT SCREEN ADDRESS 

93C2:C0 FF 

40 

CPY 

#SFF 

** 

HAS Y-REGISTER REACHED 0 ? 

93C4:F0 04 

41 

BEO 

NXTLN2 

#* 

YES-G0T0 NEXT LINE 

93C6:C4 FF 

42 

CPY 

HL 

#* 

IS Y-REGISTER >=HL ? 

93C8:BO D9 

43 

BCS 

L2A 

** 

YES-JUMP T0 L0QP2A 

93CA:C6 06 

44 NXTLN2 

DEC 

Y0 

** 

MOVE T0 Y0 NEXT LINE 

93CC:A5 06 

45 

LDA 

Y0 

** 

GET NEW Y-C0QRDINATE 

93CE:C9 FF 

46 

CMP 

#$FF 

** 

HAS Y-C00RDINATE REACHED 0 ? 

93D0:FO 04 

47 

BEQ 

RTN2 

** 

YES-WE 'RE FINI SHED 

93D2:C5 FC 

48 

CMP 

VT 

#* 

HAVE UE REACHED VT YET ? 

93D4:80 C6 

49 

BCS 

LIA 

*« 

NO-START THE NEXT LINE 

93D6:6Q 

50 RTN2 

RTS 


** 

D0NE EXIT ROUTINE 


*** SUCCESSFUL ASSEMBLY: NO ERRORS 


Listato 3 


SOURCE FILE: DRAWDN ROUTINE 
0000: 1 # DRAWDN ROUTINE 

0000: 2 * (C) 1985 BY APPLICANDO & M1CR0SPARC INC. 

0000: 3 * 

0000: 4 * TOOL KIT ASSEMBLER 

- NEXT 0BJECT FILE NAME IS DRAWDN ROUTINE.OBJO 


934C: 



5 

0RG 

$934C 



00FC: 



6 VT 

EGU 

$FC 

*« 

DECIMAL 252 

00FD: 



7 VB 

EQU 

$FD 

** 

DECIMAL 253 

OOFE: 



8 HR 

EGU 

$FE 

** 

DECIMAL 254 

00FF : 



9 HL 

EQU 

$FF 

** 

DECIMAL 255 

0026: 



10 HBASL 

EQU 

$26 

*« 

DECIMAL 38 (SCREEN BASE 

0027: 



11 HBASH 

EQU 

$27 

** 

DECIMAL 39 ADDRESS) 

0006: 



12 YO 

EQU 

$6 

«« 

DECIMAL 6 

00FA: 



13 BASL 

EQU 

$FA 

** 

DECIMAL 250 (TABLE BASE 

00FB: 



14 BASH 

EQU 

$F8 

»* 

DECIMAL 252 ADDRESS) 

9464: 



15 YADDR 

EQU 

$9464 

#* 

DECIMAL 37988 (READ YTABLE) 

CO 54: 



16 PAGE1 

EQU 

$C054 



CO 55: 



17 PAGEIX 

EQU 

$C055 



934C:A9 

00 


18 DRAWDN 

LDA 

HO 

«* 

CALL 37708 TO ENTER 

934E:85 

FA 


19 

STA 

BASL 

*# 

P0INT TO START OF TABLE 

9350:A5 

FC 


20 

LDA 

VT 

** 

GET TOP Y-C0QRDINATE 

9352:85 

06 


21 

STA 

YO 

** 

ST0RE IN $6 F0R USE BY YADDR 

9354:20 

64 

94 

22 LIA 

JSR 

YADDR 

«* 

RETURNS-L0=H8ASL/HI=HBASH 

9357:A4 

FE 


23 

LDY 

HR 

** 

SET Y-REG T0 RIGHTMOST BYTE 

9359:A2 

00 


24 

LDX 

«0 

#* 

SET TABLE 0FFSET=0 

935B:A1 

FA 


25 L2A 

LDA 

< BASL,X) 

** 

GET SHAPE BYTE FROM TABLE 

935D:8D 

54 

CO 

26 

STA 

PAGE1 

** 

DRAW MAIN MEMORY 

9360:51 

26 


27 

E0R 

(HBASL),Y ** 

M0D1FY T0 BACKGROUND 

9362:91 

26 


28 

STA 

(HBASL),Y ** 

L0AD SHAPE BYTE 0N SCREEN 

9364:E6 

FA 


29 

INC 

BASL 

** 

P0INT T0 NEXT TABLE ELEMENT 

9366:DO 

02 


30 

BNE 

J1 

** 

IFx 256 BYTES JUMP 

9368:E6 

FB 


31 

INC 

BASH 

** 

PAGE 0VERFL0W-G0T0 NEXT PAGE 

936A:A1 

FA 


32 J1 

LDA 

(BASL,X) 

** 

GET SHAPE BYTE FROM TABLE 

936C:8D 

55 

CO 

33 

STA 

PAGEIX 

** 

DRAW AUXILIARY MEMORY 

936F:51 

26 


34 

EOR 

(HBASL),Y ** 

M0D1FY TO BACKGROUND 

9371:91 

26 


35 

STA 

(HBASL),Y ** 

L0AD SHAPE BYTE QN SCREEN 

9373:E6 

FA 


36 

INC 

BASL 

«* 

POINT T0 NEXT TABLE ELEMENT 

9375:DO 

02 


37 

BNE 

NC2 

** 

IF x256 BYTES JUMP 

9377:E6 

FB 


38 

INC 

BASH 

** 

PAGE OVERFLQU-GOTO NEXT PAGE 

9379:88 



39 NC2 

DEY 


«* 

POINT T0 NEXT SCREEN ADDRESS 

937A: CO 

FF 


40 

CPY 

#$FF 

** 

HAS Y-REGISTER REACHED 0 9 

937C:F0 

04 


41 

BEQ 

NXTLN2 

** 

YES-G0T0 NEXT LINE 

937E:C4 

FF 


42 

CPY 

HL 

** 

IS Y-REGISTER >=HL 9 


(continua) 




■■ 


79 












9380:B0 

D9 

43 


BCS 

L2A 

9382:E6 

06 

44 

NXTLN2 

1 INC 

YO 

9384:A5 

06 

45 


LDA 

YO 

9336:C9 

FF 

46 


CMP 

#$FF 

9388 :F0 

06 

47 


BEQ 

RTN2 

938A:C5 

FD 

48 


CMP 

VB 

938C: 90 

C6 

49 


BCC 

LIA 

938E:F0 

C4 

50 


BEQ 

LIA 

9390:60 


51 

RTN2 

RTS 



*« SUCCESSFUL ASSEMBLY : NO ERRORS 


** YES-JUMP TO LOOP2A 
** NOME DOUN TO NEXT LINE 
#* GET NEW Y-COORDINATE 
** MS Y-COGRDINATE REACHED 0 ? 
** YES-UE'RE FINISHED 
** HAVE WE REACHED VB YET ? 

** NO-START THE NEXT LINE 
« NO-THIS IS LAST LINE 
** DQNE-EXIT ROUTINE 


Listato 4 


SOURCE FILE: REVOIR 
0000: 1 * REVDIR ROUTINE 

0000 : 2 * 

0000: 3 * (C) 1985 BY APPLICANDO & MICROSPARC INC. 

0000: 4 * S-C ASSEMBLER 

0000: 5 * 

-NEXT OBJECT FILE WME IS REVDIR.OBJO 


92F8: 



6 

ORG 

$92F8 



00FC: 



7 VT 

EQU 

$FC 

** 

DECIMAL 252 

00FD: 



8 VB 

EQU 

$FD 

** 

DECIMAL 253 

00FE: 



9 HR 

EQU 

$FE 

** 

DECIMAL 254 

OOFF : 



10 HL 

EQU 

$FF 

»* 

DECIMAL 255 

0026: 



11 HBASL 

EQU 

$26 

** 

DECIMAL 38 (SCREEN BASE 

0027: 



12 HBASH 

EQU 

$27 

#» 

DECIMAL 39 ADDRESS) 

0006: 



13 Y0 

EQU 

$6 

«* 

DECIMAL 6 

00F9: 



14 NUBYTE 

EQU 

$F9 

** 

DECIMAL 249 

00FA: 



15 BASL 

EQU 

$FA 

** 

DECIMAL 250 (TABLE BASE 

00FB: 



16 BASH 

EQU 

$FB 

*# 

DECIMAL 252 ADDRESS) 

9464: 



17 YADDR 

EQU 

$9464 

** 

DECIMAL 37988 (READ YTABLE) 

CO 54: 



18 PAGE 1 

EQU 

$C054 



C055: 



19 PAGEIX 

EQU 

$C055 



93DA: 



20 SCAN 

EQU 

$93DA 



92F8:A9 

00 


21 REVDIR 

LDA 

#0 

*# 

CALL 37624 TO ENTER 

92FA:85 

FA 


22 

STA 

BASI. 

** 

POINT TO START OF TABLE 

92FC:A5 

FD 


23 

LDA 

VB 

** 

GET BOTTOM Y-COORDINATE 

92FE: 85 

06 


24 

STA 

YO 

** 

STORE IN $6 F0R USE BY YADDR 

9300:20 

64 

94 

25 LIA 

JSR 

YADDR 

** 

RETURNS LO=HBASL/HI=HBASH 

9303:A4 

FF 


26 

LDY 

HL 

** 

SET Y-REG T0 LEFTMOST BYTE 

9305:8D 

55 

CO 

27 L2A 

STA 

PAGEIX 

** 

DRAW AUXILIARY MEMORY 

9308:20 

28 

93 

28 

JSR 

R 

** 

ROTATE/DRAU DATA BYTE 

930B:8D 

54 

CO 

29 

STA 

PAGE1 

** 

DRAW MIN MEMORY 

930E: 20 

28 

93 

30 

JSR 

R 

*# 

ROTATE/DRAU DATA BYTE 

9311 :C8 



31 

INY 


** 

POINT TO NEXT ADDRESS -> 

9312 :C4 

FE 


32 NC2 

CPY 

HR 

** 

HAVE UE PASSED HR YET ? 

9314:90 

EF 


33 

BCC 

L2A 

** 

NO-GET THE NEXT ADDRESS 

9316 : FO 

ED 


34 

BEQ 

L2A 

#* 

NO-UE'RE DOING HR NOU 

9318:C6 

06 


35 

DEC 

Y0 

** 

MOVE UP TO THE NEXT LINE 

931A:A5 

06 


36 

LDA 

YO 

** 

GET NEW Y-COORDINATE 

931C:C9 

FF 


37 

CMP 

#$FF 

»* 

HAS Y-COORDINATE REACHED 0 ? 

931E : F0 

04 


38 

BEQ 

RTN2 

*« 

YES EU'RE FINISHED 

9320:C5 

FC 


39 

CMP 

VT 

** 

HAVE UE PASSED VT 9 

9322:80 

DC 


40 

BCS 

LIA 

«* 

NO-START THE NEXT LINE 

9324:20 

DA 

93 

41 RTN2 

JSR 

SCAN 

** 

D0NE-REVISE BLOCK TABLE 

9327:60 



42 

RTS 


*# 

EXIT ROUTINE 

9328:A2 

00 


43 R 

LDX 

«0 

** 

SET OFFSET P0INTER=0 

932A:A1 

FA 


44 

LDA 

(BASL,X) 

** 

GET SHAPE BYTE FR0M TABLE 

932C:C9 

7F 


45 

CMP 

«127 

** 

IS BYTE 01111111 9 ($7F) 

932E:FO 

10 


46 

BEQ 

J2 

*# 

YES-NO NEED T0 REVERSE 

9330:C9 

01 


47 

CMP 

#1 

** 

IS BYTE 00000000 9 ($00) 

9332:90 

OC 


48 

BCC 

J2 

** 

YES-NO NEED TO REVERSE 

9334:86 

F9 


49 

STX 

NUBYTE 

«* 

SET ALL BITS TO ZERO 

9336:4A 



50 NXTBIT 

LSR 

A 

** 

PUSH BIT OFF SHAPE BYTE-) 

9337:26 

F9 


51 

ROL 

NUBYTE 

** 

PUT BIT IN RPJERSE BYTE x- 

9339:E8 



52 

1NX 


** 

BLMP BIT CGUNTER 

933A:E0 

07 


53 

CPX 

«7 

** 

HAVE UE DONE BITS 0-69 

933C: 90 

F8 


54 

BCC 

NXTBIT 

** 

NO-GO DO NEXT BIT 

933E:A5 

F9 


55 

LDA 

NUBYTE 

** 

LOAD REVERSED BYTE 

9340:91 

26 


56 J2 

STA 

(HBASL), 

Y *« 

LOAD REVERSED BYTE QN SCREEN 

9342 :E6 

FA 


57 

INC 

BASL 

** 

POINT T0 NEXT TABLE ELEMENT 

9344:DO 

02 


58 

BNE 

J3 

** 

1F x256 BYTES-JLMP 

9346:Eó 

FB 


59 

INC 

BASH 

*# 

PAGE 0VERFL0U-G0T0 NEXT PAGE 

9348:60 



60 J3 

RTS 


** 

FINISHED BYTE ROTATIQN 


«« SUCCESSFUL ASSEMBLY: NO ERRORS 


VB/HR e passano di byte in byte, ter¬ 
minando a VT/HL; pertanto DRAW 
visualizzerà la figura esattamente co¬ 
me è stata esplorata da SCAN. 

DRAWDN comincia con il mettere 
i byte della figura sullo schermo a 
VT/HR, poi prosegue fino a VB/HL. 
Il risultato è che DRAWDN disegnerà 
la figura capovolta. Questa routine 
può essere usata per capovolgere le 
figure oppure, come vedremo presto, 
sia DRAW sia DRAWDN possono 
essere usate per portare figure in avan¬ 
ti da dietro altre figure. Sceglierete 
l’una o l’altra routine a seconda che 
veniate da dietro un’altra figura alla 
sommità o alla base della figura. 

La routine REVDIR comincia l’ela¬ 
borazione della figura a VB/HL e la 
termina a VT/HR. Qui l’effetto consi¬ 
ste nell’inversione della figura da sini¬ 
stra a destra. 


Le routine MOVE $9283 
Questa serie di routine (listato 5) sarà 
molto utile da impiegare neH’anima- 
zione. Ecco ciò che fa ogni singola rou¬ 
tine. 


EORON $9283 - Guardando le linee \ 
27 e 34 delle routine DRAW e 
DRAWDN troverete le istruzioni 
EOR (HBASL),Y. Queste istruzioni 
modificano il byte di dati della figura 
nel presente sfondo dello schermo pri¬ 
ma di disegnare sullo schermo. Ciò è 
molto utile per far sì che le routine 
DRAW e DRAWDN cancellino le fi¬ 
gure dallo schermo. La funzione EOR 
è inoltre utile per spostare le figure 
sullo schermo o su altre figure, e per 
ripristinare le configurazioni di bit sul¬ 
lo schermo quando la figura va via. La 
routine EORON mette le istruzioni 
EOR (HBASL),Y nelle linee 27 e 34 
sia di DRAW sia di DRAWDN esatta¬ 
mente come appaiono nei listati 2 e 3. 


EOROFF $928D — Questa routine ri¬ 
muove le istruzioni EOR (HBASL),Y 
da DRAW e DRAWDN, sostituendo¬ 
le con istruzioni NOP (Nessuna Ope¬ 
razione). In buona parte dell’anima- 
zione non vorrete avere in funzione le 
istruzioni EOR. 


MOVERT $92AC — Questa routine è 
utilizzata con figure che si spostano 
verso destra per INCrementare i valo¬ 
ri di HR e HL. 


80 













MOVELF $92B7 - Questa routine 
non fa che DECrementare i valori di 
HR e HL ed è usata con figure che si 
spostano verso sinistra. 


GOUP $92C0 - La routine GOUP 
DECrementa i valori di VT e VB per 
figure che si spostano verso l’alto. 


GODOWN $92C9 - Questa routine 
INCrementerà i valori di VT e VB per 
figure che si spostano verso il basso. 


YINCRU $92D4 - Per usare questa 
routine dovete prima scrivere con PO- 
KE nella locazione di memoria 227 
($E3) il numero dei punti verticali di 
cui volete che si sposti la figura. La 
routine sottrarrà poi quel valore 
(YINCR) sia da VT sia da VB, facen¬ 
do sì che la figura si sposti in su di 
YNCR coordinate di schermo. 


YINCRD $92E5 - Questa routine è 
simile a YINCRU, con la differenza 
che aggiunge il valore di YINCR sia a 
VT sia a VB per figure che si spostano 
verso il basso. 

Questa serie di routine vi renderà 
molto facile la manipolazione dei valo¬ 
ri di VT, VB, HR e HL per spostare le 
figure sullo schermo. Notate che cia¬ 
scuna delle routine di spostamento 
comprende protezioni che non per¬ 
metteranno ai valori di VT, VB, HR e 
HL di superare i limiti legali di 0-39. 
Una volta aggiunte al vostro driver 
tutte queste routine salvatele su di¬ 
schetto con il comando: 

BSAVE DHR.DRIVE- 
R,A$9283,L$37D 

Creazione di figure 
in doppia Hi-Res 

Il listato 6 è un breve programma 
che creerà figure di astronavi e le sal¬ 
verà automaticamente sul dischetto. È 
sufficiente introdurre il programma ed 
eseguirlo con RUN ; vedremo poi che 
cosa sa fare. 

Le linee 80-140 sono di facile com¬ 
prensione, dato che utilizzano le stesse 
istruzioni dell’articolo precedente. 

Le linee 150-190 provvedono con 
diligenza a disegnare l’astronave sullo 
schermo usando una serie di punti ter^ 
minali HPLOT che sono definiti nelle 




Listato 5 


SOURCE FILE: MOVE ROUTINES 
0000: 1 « MOVE ROUTINES 

0000 : 2 * 

0000: 3 * (0 1985 BY APPLICANDO & MICR0SPARC INC. 

0000: 4 * TOOL KIT ASSEMBLER 

0000: 5 * 

. NEXT 0BJECT FILE NAME IS MOVE ROUTINES.OBJO 

9283: 6 0RG $9283 


00FC: 


7 VT 

EQU 

$FC 

00FD: 


8 VB 

EQU 

$FD 

00FE: 


9 HR 

EQU 

$FE 

00FF: 


10 HL 

EQU 

$FF 

0QE3: 


11 YINCR 

EQU 

$E3 

9283:A9 

51 

12 E0R0N 

LDA 

#$51 

9285:20 

92 92 

13 

JSR 

ST0RE1 

9288:A9 

26 

14 

LDA 

#$26 

928A:4C 

9F 92 

15 

JMP 

ST0RE2 

928D:A9 

EA 

16 E0R0FF 

LDA 

#$EA 

928F: 20 

9F 92 

17 

JSR 

ST0RE2 

9292:8D 

60 93 

18 ST0RE1 

STA 

$9360 

9295:8D 

6F 93 

19 

STA 

$936F 

9298:8D 

A8 93 

20 

STA 

$93A8 

929B:8D 

B7 93 

21 

STA 

$9387 

929E:60 


22 

RTS 


929F:8D 

61 93 

23 ST0RE2 

STA 

$9361 

92A2:8D 

70 93 

24 

STA 

$9370 

92A5:8D 

A9 93 

25 

STA 

$93A9 

92A8:8D 

B8 93 

26 

STA 

$93B8 

92AB: 60 


27 

RTS 


92AC:A5 

FE 

28 MOVERT 

LDA 

HR 

92AE:C9 

27 

29 

CMP 

#39 

9280:80 

04 

30 

BCS 

J1 

92B2:E6 

FE 

31 

INC 

HR 

92B4:E6 

FF 

32 

INC 

HL 

9266:60 


33 J1 

RTS 


92B7:A5 

FF 

34 MOVELF 

LDA 

HL 

92B9:F0 

04 

35 

BEQ 

J2 

92BB:C6 

FE 

36 

DEC 

HR 

92BD:C6 

FF 

37 

DEC 

HL 

92BF:60 


38 J2 

RTS 


92C0:A5 

FC 

39 GOUP 

LDA 

VT 

92C2-.F0 

04 

40 

BEQ 

J3 

92C4:C6 

FC 

41 

DEC 

VT 

92C6:C6 

FD 

42 

DEC 

VB 

92C8:60 


43 J3 

RTS 


92C9:A5 

FD 

44 GODOUN 

LDA 

VB 

92CB:C9 

BF 

45 

CMP 

#191 

92CD:B0 

04 

46 

BCS 

J4 

92CF:E6 

FC 

47 

INC 

VT 

92D1:E6 

FD 

48 

INC 

VB 

92D3:60 


49 J4 

RTS 


92D4:A5 

FC 

50 YINCRU 

LDA 

VT 

92D6:38 


51 

SEC 


92D7:E5 

E3 

52 

SBC 

YINCR 

92D9:30 

09 

53 

BMI 

J5 

92DB:85 

FC 

54 

STA 

VT 

92DD:A5 

FD 

55 

LDA 

VB 

92DF:38 


56 

SEC 


92E0 :E5 

E3 

57 

SBC 

YINCR 

92E2:85 

FD 

58 

STA 

VB 

92E4:60 


59 J5 

RTS 


92E5:A5 

FD 

60 YINCRD 

LDA 

VB 

92E7 :18 


61 

CLC 


92E8:65 

E3 

62 

ADC 

YINCR 

92EA : C9 

CO 

63 

CMP 

#192 

92EC:B0 

09 

64 

BCS 

J6 

92EE: 85 

FD 

65 

STA 

VB 

92F0:A5 

FC 

66 

LDA 

VT 

92F2:18 


67 

CLC 


92F3:65 

E3 

68 

ADC 

YINCR 

92F5:85 

FC 

69 

STA 

VT 

92F7:60 


70 J6 

RTS 



*** SUCCESSFUL ASSEMBLY: NO ERR0RS 


** DECIMAL 252 
** DECIMAL 253 
« DECIMAL 254 
** DECIMAL 255 
** DECIMAL 227 
** CALL 37507 T0 ENTER 
« INSERT E0R < HBASL),Y 
** IN DRAU AND DRAU0N 

** CALL 37517 T0 ENTER 

** REMOVE EOR (HBASL),Y FR0M DRAU/DRAUDN 


** CALL 37548 T0 ENTER 

** INCREMENT HR AND HL 
** DON'T ALL0U HR>39 


** CALL 37559 T0 ENTER 

« DECREMENT HR AND HL 
** DON'T ALLOUI HLxO 

** CALL37568 T0 ENTER 

« DECREMENT VT AND VB 
** DON'T ALL0U VTxO 

** CALL 37577 T0 ENTER 

** INCREMENT VT AND VB 
« DON'T ALL0W VB)191 


*# CALL 37588 T0 ENTER 


** SUBTRACT YINCR 
** FR0M VT AND VB 
h DON'T ALL0W VTxO 


** CALL 37605 TO ENTER 


** ADD YINCR 
** T0 VT AND VB 
« DON'T ALL0U VB)191 


81 


















Mi 

Listato 6 

150 





160 

10 

REM 

*********************** 



20 

REM 

* SHAPE.MAKER * 


170 

30 

REM 

* DI ROBERT R. DEVINE * 



40 

REM 

* COPYRIGHT (0 1985 * 


180 

50 

REM 

* BY APPLICANDO 4 * 



60 

REM 

* MICR0SPARC INC. * 


190 

70 

REM 

a********************** 


200 


80 PRINT CHR$ <4) B BL0AD DHR.DRIVER": CALL 37999: HIMEM: 37 
507: REM LOAD/SETUP/PRQTECT 
90 CALL 37953: REM INIT 

100 H6R : CALL 37928: REM PULISCE LO SCHERMO DHR 

110 POKE 49153,0: POKE 49234,0: REM 80STORE /SCHERMO PIENO 

120 HCOLQR= 3 : GOTO 150 

130 POKE 49236,0:C = INT (X / 7): IF C / 2 = INT (C / 2) 
THEN POKE 49237,0: 

140 XC = INT (C / 2M X / 7 - C:XC = INT (XC * 7 ♦ .5): 
RETURN 


■MMI 


TO XC,Y1 : NEXT : RESTORE 

FOR X = 39 TO 20 STEP - 1: READ Y: READ Y1: GOSUB 130: 
HPLOT XC,Y TO XC.Y1: NEXT 

FOR M = 6 TO 30 STEP 8: FOR X = M TO M ♦ 3: READ Y: 60S 
UB 130: HPLOT XC,Y TO XC,5: NEXT X,M 
DATA 5,6,5,6.5,7,5,7,4,8.4,8,7,9,7,9,7,10,7,10,3,10,3,1 
0.2.11.2.11,7,il.7.11,7,11.7.l{,l,Ì2.1,12 
DATA 4,4,3 1 3,2.2.I J l.l J l f 2,2,3.3 J 4 l 4 
POKE 251.144: POKE 252,0: POKE 253.13: POKE 254,2: POKE 
255,0: CALL 37850: REM SDW THE SH1P 
210 PRINT CHR$ (4)"BSAVE SHAPE-U #144,A$9000,L84": REM SA 
VE 'DRAU' SHAPE 

220 POKE 254,12: POKE 255,10: CALL 37780: REM DRAU IT 

230 POKE 254,22: POKE 255.20: CALL 37708: REM DRAUDN IT 

240 POKE 251.143: CALL 37850: REM SCM DRAUDN StttPE 

250 PRINT CHR$ (4)"BSAVE SHAPE-D #143,A$8F00,L84": REM SA 
VE DRAUDT4' SHAPE 

260 POKE 251.144: POKE 254,32: POKE 255,30: CALL 37624: REM 
REVDIR IT 


TAVOLA 1: SOMMARIO DELLE ROUTINE AGGIUNTIVE 



DEL DHR DRIVER 

Nome 

Indirizzo 

Indirizzo 

Funzione 

della routine 

di chiamata 

esadecimale della routine 

SCAN 

37850 

$93DA 

Crea una tavola delle figure a blocco 

dallo schermo. 




DRAU 

37780 

$9394 

Disegna una figura dalla base alla 

sorareit<. 




DRAUDN 

37708 

$934C 

Disegna una figura dalla sommiU alla 

base. 




REVDIR 

37624 

$92F8 

Inverte la figura e crea una nuova 

tavola. 




YINCRD 

37605 

$92E5 

Aggiunge INCR a VT e VB. 

YINCRU 

37588 

$92D4 

Sottrae YINCR da VT e VB. 

GODQUN 

37577 

$92C9 

Aggiunge uno a VT e VB. 

G0UP 

37568 

$92C0 

Sottrae uno da VT e VB. 

M0VELF 

37559 

$92B7 

Sottrae uno da HR e HL. 

M0VERT 

37548 

$92AC 

Aggiunge uno a HR e HL. 

E0R0FF 

37517 

$9280 

Cancella le funzioni DRAU e DRAUDN 

E0R. 




E0R0N 

37507 

$9283 

Installa le funzioni DRAU e DRAUDN 

EOR. 




POKE SPECIALI DA USARE CON IL DRIVER 

POKE 227.YINCR 

Determina 

il valore 

che YINCRU e YINCRD dovranno usare per 

modificare VT e VB. 



POKE 251,SHNUM 

Dice a SCFN, DRAU, 

DRAUDN e REVDIR dove trovare la tavola 

delle figure. 




POKE 252,VT 

Imposta 1 

a coordinata Y pi' alta della figura. 

POKE 253,VB 

Imposta la coordinata Y pi' bassa della figura. 

POKE 254,HR 

Imposta 1 

'offset d' 

indirizzo pi' a destra della figura. 

POKE 255,HL 

Imposta l'offset d" 

indirizzo pi' a sinistra della figura. 


Notate che esistono molti altri punti nei quali potreste decidere di introdurre una 
routine pilota (driver) per eseguire funzioni speciali. Se desiderate intraprendere 
qualche azione che non è qui descritta, scorrete ogni listato per vedere se qualche 
altro punto d'introduzione possa assolvere il compito. Ci sono anche molti modi in 
cui potreste cambiare le funzioni di una routine con pochi semplici POKE. Per 
esempio potreste cambiare le routine GODOWN e YINCRD per restare al disopra di 
VB=159 se steste usando il modo misto testo e grafica, oppure potreste introdurre 
alcuni POKE per cancellare la funzione SCAN automatica di REVDIR. 


istruzioni DATA. La figura è disegna¬ 
ta esattamente come è definita nella 
figura 1. La riga supplementare di by¬ 
te vuoti sopra la figura e quella sotto la 
figura si trovano lì in modo che la figu¬ 
ra si cancelli mentre la spostate qua 
là sullo schermo. 

La linea 200 scrive con POKE il va¬ 
lore di SHNUM (memorizzerete la fi¬ 
gura a $9000). Poi imposta i valori di 
VT, VB, HR e HL. Infine fa lo SCAN 
in memoria della figura. A questo 
punto la tavola delle figure a blocco è 
stata creata in memoria ed è disponibi¬ 
le per l’impiego con le routine di dise¬ 
gno. 

La linea 210 salva la tavola delle 
figure su dischetto. 

La linea 220 porta i valori di HR e 
HL in un’altra parte dello schermo e fa 
una prova disegnando con DRAW la 
figura dalla tavola. Se adesso non ci 
sono sullo schermo due astronavi vuol 
dire che c’è un problema o con la routi¬ 
ne SCAN o con quella DRAW. 

La linea 230 porta HR e HL in un’al¬ 
tra parte ancora dello schermo e fa il 
DRAWDN della figura dalla tavola. 
La terza astronave che compare sullo 
schermo dovrebbe essere disegnata 
capovolta. 

La linea 240 cambia il numero della 
figura (SHNUM) in 143 ($8F00) e 
mette con SCAN la figura capovolta in 
un’altra tavola delle figure. Dovreste 
notare che, dato che DRAWDN dise¬ 
gna sempre la figura capovolta rispet¬ 
to al modo in cui ne è stato fatto lo 
SCAN, ora che avete fatto lo SCAN 
della figura 143 capovolta DRAWDN 
disegnerà la figura 143 nella giusta po¬ 
sizione diritta. 

La linea 250 salva su dischetto que¬ 
sta seconda* tavola delle figure. 

A questo punto ci sono due figure 
salvate sul dischetto. La figura 144 sa¬ 
rà disegnata nella sua giusta posizione 
diritta con DRAW, e la figura 143 sarà 
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disegnata nella sua giusta posizione di¬ 
ritta con DRAWDN. 

La linea 260 seleziona nuovamente 
la figura 144, sposta di nuovo HR e HL 
e disegna una versione invertita della 
figura 144. Probabilmente non notere¬ 
te alcuna differenza in questa forma 
invertita con REVDIR dato che è sim¬ 
metrica; tuttavia se la figura appare 
esatta sullo schermo potete essere ra¬ 
gionevolmente certi che REVDIR 
funziona a dovere. 

Dovreste rendervi conto che la ta¬ 
vola delle figure 144 è stata modificata 


SCAN ha reso molto facile tradurre il 
disegno in una tavola di figure a bloc¬ 
co. 

Nel prossimo articolo scoprirete co¬ 
me animare le figure da voi create e 
come produrre il movimento in doppia 
alta risoluzione sia in Applesoft sia in 
linguaggio macchina. Il vostro Apple 
//e o //c ne sarà entusiasta. 

r* 1 

Questo programma è disponibile su 
dischetto. L’elenco, i prezzi e le 
modalità d’ordine di questo e degli altri 
dischetti disponibili sono riportati nella 
rubrica Disk Service. 

- K 

- 1985 by fibbie e Applicando 


(soltanto nella memoria, non sul di¬ 
schetto) dalla routine REVDIR che 
ha rifatto lo SCAN della figura. Se 
guardate la figura 1 noterete che ci 
sono due punti vuoti alla destra della 
figura; quando REVDIR ha svolto il 
suo compito ha spostato quei due pun¬ 
ti vuoti alla sinistra della figura. 

Come potete vedere da questo bre¬ 
ve programmino la parte più difficile è 
stata il disegno della figura originale 
sullo schermo mediante istruzioni 
HPLOT. Una volta che la figura è sta¬ 
ta impostata sullo schermo, la routine 


dimensione prestazioni 


PIÙ POTENZA PER L’APPLE 


APPLE II e Ile, sistemi operativi: 

DOS 3.3, diversi DOS, PRODOS, CP/M 2.2 (vers. 56K), PASCAL 1.1 e 1.2 
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applicando 

si trova anche qui 

Ecco un elenco dei computer shop presso i quali è possibile abbonarsi ad Applicando , 
acquistare una copia, cercare un numero arretrato... 


VALLE D 'AOSTA 


Aosta 

Informatique sas. 

Av. Conseil desCommis 14 

PIEMONTE 


Alba (CN) 

Centro computer. 

Via Paruzza 2 

Asti 

Gestione Dati srl. 

Via B. Buozzi 45 

Biella ( VC ) 

Consul Computer srl. 

Via delle Rose 2 
Informatica Biella sas. 

Piazza S. Paolo I B 

Domodossola (NO) 

Nuova Elettronica. 

Via Giov anni XXIII68 

Novara 

DRsrl. V ieXXSettembre 19 
SPA srl. Via A. Canobio 16 A 

Pinerolo(TO) 

Elaborazione Dati Pinerolo, 
Corso Piave 42 

Torino 

A B.Computer sas. 

Corso Grosseto 209 
Digitalsvncsnc, 

Corso Moncalieri 303 
Dimensione Personal. 

Via Bertola 22/e 
GE.NE.C A. srl. Via Bertola5 
Hobby Elettronica, 
ViaSaluzzo 11 F-G-H 
Omicron Computers snc. 

C.so Duca degli Abruzzi 14 
Pinto G.-Componenti elettr.. 
Corso Principe Eugenio 15 bis 
Tecnosystem Computer Shop, 
Via Beaumont 10 
Tekno Computers srl, 

Via Madama Cristina 31 c 

LIGURIA 


Genova 

Computer Center, 

Via San Vincenzo 129 r 


SALS Informatica spa, 
via D'Annunzio 2 e 
V ie B Partigiane 132 R 

Lavagna (GE) 

CR2 Informatica snc. 
Corso Genova 100 

La Spezia 

Softline srl. Via Piave 19 
Sanremo (IM) 

A.E.S., Via Volta 24 

Savona 

Briano snc. 

CorsoTardye Benech20r 
Sestri Ponente (GE) 

All Computer sas. 

Via C. Menotti 136 r 

LOMBARDIA 


Almé(BG) 

Elcod. Viale Italia45 A 
Assago(MI) 

Basic Computers. Centro 
Commerciale Milano Fiori 

Bergamo 

Studio 15 srl. Via Quarenghi 60 
Il mondo dell'informatica. 

Via PitentinoH 

Brescia 

Alfa computer. Via Bassi 26 
Brescia Computers srl. 

Via Malta 12 
Il Computer srl. 

Via B Croce 23 
L'Informatica srl. 

Piazza Vescovado 1 
Personal Data, via Brozzom 4 

Como 

Accaesse Informatica srl. 

Via Acquanera 46 

D.S I. srl. Via Dottesio8 

Gavardo(BS) 

Bit Shop, Via Ci . Quarena 120 
Lecco (CO) 

Computers Lecco snc. 

Via Nino Bixio 18/B 
Datamation, Via Turati 10 

Lissone (MI) 

Computerlandia. 

Via Martiri Libertà 103 


Mdegnano (MI) 

L'Amico del Computer, 

Via Castellini 25 

Milano 

A G.Informatica srl. 

Via G .Silva 49 

Communications Engineering. 
Piazza Firenze 4 
Deltron srl. 

Viale Gran Sasso 50 
Edelektron srl. 

Corso Sempione 39 
Esprit, Via Bergamini 13 
Happy System. Piazza Diaz 6 
Information Technology . 

Via dei Bossi 7 
All'Informatica Shop. 

Via Lazzaretto 2 
Macan sas. Via Broletto 39 
Microtech Sistemi. 

Via Bronzetti 20 
Polisistemi. Via Derna 19 
SH Computers srl. 

Viale Montenero 33 
Small Business Computers, 

Via Vitruvio 38 
Softec Computer. 

Viale E. Jenner 23 

Monza (MI) 

ESI srl. Via Cavallotti 11 
Nikom Electronics, 

Via Asiago 7 

Pavia 

M.A.S.H. Computer Systems, 
Strada Nuova 86 
Senna Gianfranco snc. 

Via Calchi 5 

Trezzano sul naviglio (MI) 
Personal computer shop. 

Via L.da Vinci 36 

Segrate (MI) 

Compusoft, 

Milano2, Resid. Lago 

Varese 

IRPE srl. Via Morazzone 8 


TRENTINO 


Trento 

SI.GE. sas. Via Piave 28 


FRIULI VENEZIA 
GIULIA 


Gorizia 

Elcorn. C so Italia 149 
Pordenone 
Electronic C enter snc. 
Viale Libertà 79 

Turriaco(GO) 

Tecno Power Elettronica, 
Via Marconi 19 

Udine 

BIT Computers. 

Via Pozzuolo 107 
PS Elettronica sas. 

Via Tavagnacco 89/91 C.C. 

VENETO 


Bassano del Grappa (VI) 

A Tre snc. Via Buonarroti 23 
Conegliano (TV) 
Computing Program, Via G. 
Piovesana 32 

Mestre (VE) 

Pacinotti sas. Via Torino 92 
Mirano (VE) 

Saving Elettronica, 
via Gramsci 40 

Montebelluna (TV) 

Uomo Computer, 

C.so Mazzini 53 

Padova 

Capovilla & C. sas. 

Galleria Scrovegni 5 
Computer Service srl. 

Via Beethoven 3 

E.D.P. Sistemi srl. 

Via Borromeo 16 

Treviso 

A5 Computers srl. 

Borgo Cavour 37/A 

Venezia 

AZTelemarket, 

Cannaregio 5898 
Personal Computer, 
Cannaregio 

Verona 

ARMUsrl, 

Via Teatro Filarmonico 3 
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Esacomp srl. Via Roveggia 43 
MOS 80 sas. Via Germania 21 

Vicenza 

Sevi sas, Via S. Agostino 87 

\ illafranca (VR) 

Studio 4, 

Corso Vitt.Emanuele 70 

EMILIA ROMAGNA 


Bologna 

CEDA Minicompsrl, 

Piazza Aldrovandi 2/2 
Computer Systems, 

Via Ercolani 10/D 
EDP Sistemi BO srl. 

Viale Pietramelara 61/F 
SSRCOM, Via B. da Carpi 9/B 

Cesena (FO) 

SHC snc. Corso Cavour 157 

Ferrara 

Soc. Termomeccanica, 

Via Garibaldi 195 
Mazzacurati Claudio, 

Viale Cavour 186/188 
Tecnomeccanica. 

Via Garibaldi 195 

F idenza(PR) 

Archimede. 

Via Vito Aimi 2 
RCM Computer. 

ViaCornini Malpeli 11 

Fiorenzuola d'Arda (PC) 
Centro Computer. 

Corso Garibaldi 125/A 

Forlì 

A-Z Computer srl. 

Via Cignani 7 

Kronos, Via Oreste Regnoli 30 
Modena 

Masetti Elettronica srl. Via 
Emilia Centro 211 

Parma 

RCM Computer, 

Via Farini 5 la 

Piacenza 
RCM Computer. 

( .so Vittorio Emanuele 96 

P eggio Emilia 
Computer Center srl. 

Via D. Alighieri 4 
Esaprogetti, Via F.Filzi 2 

Rimini 

Computer Line, Via Coletti 61 
Scandiano (RE) 

Informatica System. 

Via Statale 13 A 

Viserba di Rimini (FO) 
Computer Center. 

Via Pallotta 25/A 

TOSCANA 


Borgo a B uggiano (PT) 

CO-DI snc. Via 24 Maggio 119 


Firenze 

Anfrel Informatica sas. 

Via Masaccio 50 e 
Viale Gramsci 10/R 
Elettronica Cento Stelle srl. 

Via Cento Stelle 5/B 
Paoletti Ferrerò, 

Via il Prato 40/42 R 
P.T.E. snc. Via Duccio 
da Buoninsegna60 
Soluzioni EDP srl. 

Corso dei Tintori 39R 

Grosseto 

C.I.S.I.D. Computersnc, 

Via Aurelia Nord 35 e 
Via Pasubio 1-11 

Massa 

Euro Computer sas. 

Piazza C. Bertagnini4 

Montecatini 

CO-DI snc. Via I Maggio 20/22 
frazione Margine Coperta 

Perignano (PI) 

Memor Informatica srl. 

Via Togliatti 2-4-8 

Piombino ( LI) 

Centro Ufficio sdf. 

Via F. Ferrer 37/39 

Pisa 

Società Elettronica Tirrena. 

Via Fucini 20 

Pistoia 
Inter Systems. 

Via Pietro Mascagni 14 

Pontedera(PI) 

Data Port srl. 

Via Brigate Partigiane 27 

5 . Giovanni \ aldarno (AR) 

I.C.S. srl. Via Garibaldi 46 

UMBRIA 

Cerbora di città (PG) 

Computer Post. 

Via Madonna del Vento 

Foligno (PG) 

Linea informatica snc. 

Via Garibaldi 81 

LAZIO 

Lido di Ostia (Roma) 

A.C.S. - Advanced Computer 
System, Via S. Consacchi 10 

Roma 

BIOTECH srl. 

Via S. Valentino 18 
Bit Computers, 

Via Giovanni Gastaldi 33 
Computer Center srl . 

Via Nizza 48/52 
Computerai srl. 

Via Michele di Landò 41 
Computime srl. Viale Parioli 25 
Easy Byte, 

Via Giovanni Villani 24 
E.D.P. Market, 

Via E. Fermi 116/118 


E.M.EUR Micro Computer, 
Viale C. Pavese 267 

5.1. G.E.E.I. srl. 

Via Nomentana 265-273 

5.1. PR.EL. srl. 

Via Pompeo Magno 94 

Roma EUR 

Bit Computers, 

Via F. Domiziano 10 

Viterbo 

Alfa Computer, 

Via Palmanova 12/C 

MARCHE 

Civitanova Marche (MC) 
N.B.P. Elettronica. 

Via Don Bosco 1113 

Jesi (AN) 

E.M.J. sas. Via F. Conti 4 
New Computer srl. 

Via N. Sauro 17/A 

Torrette di A ncona (AN) 
Sistedasrl. Via Velino 5 

ABRUZZO 

Avezzano(AQ) 

Aspron, Via America 10/12 

Chieti 

Computer Point sas. 

Viale Unità d'Italia 5 

L'Aquila 

S E. A D. srl. via G. di 
Vincenzo 

Lanciano (CH) 

Electronic Microsystems. 

Via della Pace 3 

MOLISE 

Campobasso 
Informatica Molisana. 

Via 24 Maggio 185'189 

CAMPANIA 

A vellino 

I.C.C. elettronica srl. 

Via degli Imbimbo 126 

Barano d'Ischia (NA) 
Matterà Antonio. Via Roma 61 
Benevento 
Masone Informatica. 

Viale dei Rettori 57 

Napoli 

Computer Systems srl. 

Via G . Santacroce 40 
Golden Computer srl. 

Via Michelangelo 7 
I.C. International Computer, 
Viale A. Gramsci, 176 
La Barbera Carlo sas. 

Via Toledo 320 

Salerno 

Computer System, 

Via E. Bottiglieri 19 
SEDA srl, 

via Parmenide c/o Iannone 


CALABRIA 

Catanzaro 

Visicom srl. 

Via Minniti Ippolito 10 

Cosenza 

Micro Systems sdf. 

Via Pane Bianco 26 

Gioia Tauro (RC) 

Tecnocompsnc. 

Via Nazionale SS 111/117 

Reggio Calabria 
GLM Informatica snc. 

Via De Nava98 

Spezzano Albanese (CS) 
Iannibelli. ViaStragolia 48 

PUGLIA 

Bari 

L. e L. Computers srl. 

Largo 2 Giugno 4 
Ciesse spa. 

Via Re David 176/D 

Foggia 
ISI srl. 

Via Barletta 6 

Taranto 

Elettrojolly Centro srl. 

Via De Cesare 13 

BASILICATA 

Matera 

Lucana Sistemi srl. 

Via Don Minzoni 4 

SICILIA 

Catania 

Centro Informatica sdf. 

Via Firenze 211 
Computer Shop. 

Via E. Orlando 164 
SI .EL Informatica snc. 

Via Etnea 289 

Catanzaro 

Ce Simsas Via Carlo V 174/180 
Messina 

C.E.E. srl. Via Industriale 116 
Cubeta srl. Via Cardines 12/14 

Milazzo (ME) 

Tectron Tecnologie Elet. srl. 
Via dei Mille 

Palermo 

Informatica Commerciale spa. 
Via Notarbartolo 26 

Ragusa 

Sosyco, Corso V. Veneto 597 

Trapani 

Gualano Eugenio, 

Via Virgilio 11 

SARDEGNA 

Sassari 

Bajardo, V.le Italia 16 
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Per chi 
comincia 



N uovi lettori, siate i benvenuti. Queste 
pagine sono per voi, e le ripeteremo a 
ogni numero per facilitare il primo incontro 
con Applicando e con il mondo di Apple. 
Ovviamente queste righe non intendono 
sostituire i manuali, dei quali consigliamo 
caldamente la lettura, ma possono bastare 
per chi intende soltanto utilizzare i pro¬ 
grammi che pubblichiamo, copiarli, salvar¬ 
li su dischetto e farli partire. 

Cominciamo con qualche rapidissima 
premessa su Apple //. Quando accendete 
per la prima volta il vostro Apple con un 
dischetto già inserito nel drive e la tastiera 
posizionata sull’inglese (per chi possiede 
Apple //e e //c), dovreste veder comparire 
sullo schermo il segno chiamato curso¬ 
re, o prompt, in inglese. Mentre se avete la 
tastiera posizionata su italiano, vedrete é. 
La sua presenza significa che potete fare 
una di queste tr<=* cose: 

1) Fornire al computer comandi destinati 
al drive (per esempio CATALOG mostra il 
contenuto del dischetto, se si tratta di un 
dischetto in Basic). 

2) Fornire comandi nella versione per 
Apple del linguaggio Basic (e cioè l’Apple- 
soft Basic). 

3) Battere sulla tastiera righe di pro¬ 
grammi in Applesoft Basic. 

Per copiare un programma da Applican¬ 
do potrà essere necesario fare tutte e tre le 
cose. 

Per battere un programma 

di applicando 

Per prima cosa sarà opportuno leggere 
fino in fondo l’articolo che accompagna il 
programma. Può darsi che non capiate pro¬ 
prio tutto la prima volta: non preoccupate- 
vene, in seguito diventerà facilissimo. Cer¬ 
cate soprattutto le eventuali istruzioni che 
spiegano se occorre fare qualcosa di parti¬ 
colare per battere il programma. In ogni 
caso assicuratevi di aver pronto un dischet¬ 
to già inizializzato per poter salvare quel 
che avrete battuto. Per i dettagli su come 
inizializzare un dischetto vergine, guardate 
i manuali: chi proprio ai manuali fosse al¬ 
lergico, faccia così: a Apple spento inseri¬ 
sca il dischetto System Master nel drive 1, e 
accenda il computer: quando il drive avrà 
smesso di girare (lueina rossa di nuovo 
spenta), tolga il System Master dal drive e 
inserisca al suo posto un dischetto sicura¬ 
mente vergine e sicuramente mai usato (at¬ 
tenzione: si possono ri—inizializzare anche 
dischetti già usati, ma il loro contenuto va 
irrimediabilmente perso); ora basta battere 
NEW, Return, e poi INIT HELLO, sem¬ 
pre seguito da Return. 

Tutti i programmi in Basic consistono di 
una sequenza di righe di istruzioni. Tutte le 


righe sono numerate all’inizio, e possono 
contenere una o più istruzioni. Se le istru¬ 
zioni sono più d’una, esse saranno separate 
da segni di due punti (:). Per esempio: 


20 FOR J = 1 TO 5 : PRINT 
CHR$(7):NEXT J 


Per copiare da Applicando un program¬ 
ma, inserendolo nel vostro Apple, occorre 
assicurarsi che la memoria operativa del 
computer sia vuota battendo NEW Return 
(questa istruzione non cancella nulla di ciò 
che è registrato sui vostri dischetti: libera 
soltanto la memoria del computer dall’ulti¬ 
mo programma usato), ed è necessario poi 
battere i listati così come sono stampati, 
riga per riga, compresi i numeri di riga, 
battendo Return solo quando si arriva al 
numero di riga successivo. Quando sarà 
stata copiata anche l’ultima riga e l’ultimo 
Return (a fine riga), si potrà salvare il pro¬ 
gramma su dischetto (il dischetto che avete 
inizializzato, o un altro già inizializzato in 
precedenza su cui ci sia spazio libero a suffi¬ 
cienza). Per salvarlo basterà battere il co¬ 
mando SAVE, seguito dal nome che inten¬ 
dete dare al programma che avete trascrit¬ 
to. Questo è tutto, ma vediamo passo per 
passo un esempio. 


10 REM CAMPANELLO 
20 FOR J = 1 TO 5 : PRINT 
CHR$(7):NEXT J 
30 END 

Listato 1 


Per battere il semplice programma Cam¬ 
panello del listato 1 (produce solo un suono 
simile a quello di un campanello, null’al- 
tro), si seguirà questa sequenza: 

1) Battete NEW Return per cancellare 
dalla memoria qualsiasi programma prece¬ 
dentemente usato. (Se state lavorando su 
un Apple //e o un //c assicuratevi che il tasto 
CAPS LOCK, il primo in basso a sinistra, 
quello che permette di ottenere tutte maiu¬ 
scole, sia schiacciato). 

2) Battete la linea 10 esattamente com’è 
stampata e premete il tasto Return solo alla 
fine dell’ultima parola (CAMPANELLO). 

3) Battete allo stesso modo anche le linee 
20 e 30. 

4) Con un dischetto già inizializzato nel 
drive (nel drive 1, se ne avete due), battete 
SAVE CAMPANELLO Return, per regi¬ 
strare il vostro programma su dischetto. 

5) Poiché il vostro programma è ancora 
nella memoria del computer, per farlo gira¬ 
re basterà battere RUN e premere il tasto 
Return. Se cancellate la memoria facendo 
girare un altro programma o spegnendo il 


computer, per usare nuovamente il pro¬ 
gramma occorrerà inserire il dischetto nel 
drive e battere RUN CAMPANELLO Re¬ 
turn. 

Alcuni suggerimenti 

I suggerimenti che seguono possono ren¬ 
dere il lavoro di trascrizione un po’ più 
facile: 

1) Se commettete un errore di battitura 
in una riga e non avete ancora premuto il 
tasto Return, basterà tornare indietro con 
la freccetta sinistra, correggere l’errore, e 
tornare al punto in cui eravate cW la frec¬ 
cetta destra, premendo Return coinè al so¬ 
lito solo a completamento dell’intera riga. 
Se invece vi accorgete dell’errore quando 
ormai avete premuto Return e siete passati 
a un’altra riga, completate tranquillamente 
la riga che state scrivendo, compreso il Re¬ 
turn finale; poi ribattete la riga in cui avete 
commesso l’errore: ribattetela per intero, 
con numero di riga e tutto il resto, e la 
nuova versione prenderà automaticamente 
il posto della vecchia. 

2) Siate particolarmente attenti a non 
commettere errori di trascrizione nelle ri¬ 
ghe in cui compare l’istruzione DATA. 
Nelle altre istruzioni un eventuale sbaglio è 
più facile da individuare, perché penserà 
eventualmente il computer a segnalarlo in 
seguito, nelle istruzioni DATA questo in¬ 
vece non avviene. 

3) Salvate periodicamente il programma 
mentre procedete, per minimizzare i guai 
di una eventuale interruzione di corrente. 
Se non avete tempo per trascrivere tutto il 
progamma, trascrivete fin dove potete o 
volete (ma comunque completando fino al 
Return la riga che state battendo), poi sal¬ 
vatelo su dischetto come se aveste finito. 
Per riprendere a trascrivere sarà sufficiente 
inserire il dischetto nel drive, accendere il 
computer, e battere LO AD seguito dal no¬ 
me che avete dato al programma, e da Re¬ 
turn (battete CATALOG se non ricordate 
più con che nome avete salvato il program¬ 
ma). La luce rossa sul drive si accenderà, e 
il vostro programma verrà caricato nella 
memoria operativa del computer. A questo 
punto battete LIST, e vedrete scorrere sul¬ 
lo schermo tutta la parte del programma 
che avevate già battuto. Continuate adesso 
tranquillamente dal punto in cui avevate 
interrotto. 

4) Prima di effettuare modifiche o ag¬ 
giunte, trascrivete l’intero programma e fa¬ 
telo girare per prova. Questo renderà più 
facile la ricerca di eventuali errori, isolando 
quelli commessi durante la battitura e la 
trascrizione. Non preoccupatevi per il nu¬ 
mero di errori di trascrizione che farete: è 
normale. Il computer vi segnalerà, riga per 
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riga, dove avete sbagliato. Basterà a questo 
punto controllare la riga, individuare l’er¬ 
rore commesso e ribattere correttamente 
l’intera riga. A questo punto occorre salva¬ 
re di nuovo il programma su dischetto. 

5) Le lettere minuscole possono essere 
usate solo all’interno di comandi che inclu¬ 
dono REM o tra virgolette. 

Programmi in 
linguaggio macchina 

Il Basic e il Dos sono ottimi linguaggi, 
ideati apposta per rendere più facile la pro¬ 
grammazione, ma l’Apple è in grado di 
ricevere comandi anche in un codice molto 
più vicino alla sua logica, chiamato linguag¬ 
gio macchina. Il linguaggio macchina è un 
po’ la lingua madre dell’Apple, un pro¬ 
gramma così composto sarà quindi compre¬ 
so dal computer molto più velocemente di 
un programma scritto in Basic. Per creare 
programmi in questa lingua si usa spesso un 
programma chiamato Assembler. L’As- 
sembler permette al programmatore di 
scrivere in un codice più facile del linguag¬ 
gio macchina: l’assembly. In un secondo 
momento il programma stesso si tradurrà in 
linguaggio macchina. L’Apple infatti non 
conosce l’assembly. 

Molti dei programmi che troverete su 
APPLICANDO saranno scritti in ambe¬ 
due le versioni: assembly e linguaggio mac¬ 
china; in questo modo potrete inserire le 
istruzioni direttamente in linguaggio mac¬ 
china, senza dovervi procurare il program¬ 
ma Assembler. In questo caso le istruzioni 
dovranno essere inserite direttamente nel 
System Monitor (da non confondere col 
monitor video): per raggiungere il System 
Monitor è sufficiente battere CALL-151 e 
schiacciare il tasto Return. A questo punto 
sullo schermo comparirà un asterisco (*) 
che indica che è stato raggiunto il contatto 
con il System Monitor. Per inserire i listati 
scritti in linguaggio macchina occorrerà al¬ 
lora battere, per esempio, i seguenti co¬ 
mandi: 


300: A2 05 20 DD FB CA F0 03 4C 02 03 60 
Return 


In questa serie di istruzioni il ’300’ indica 
una locazione di memoria e i due punti 
dicono all’Apple di inserire i seguenti nu¬ 
meri (A2 e gli altri numeri in base 16) in 
quella locazione. I numeri sono in base 16 
(esadecimale); non è necessario saper cal¬ 
colare con questa base per trascrivere i pro¬ 
grammi in linguaggio macchina, ma è im¬ 
portante sapere che in questo tipo di lin¬ 
guaggio i numeri sono dati sempre in esade¬ 
cimale. 

Facciamo un breve esempio di program¬ 
ma scritto in linguaggio macchina. Il se¬ 
guente listato serve a indirizzare alcuni dati 
in una particolare locazione di memoria: 


300.30B 

0300-A2 05 20 DD FB CA F0 03 
0308-4C 02 03 60 

Listato 2 


I numeri a sinistra delle lineette (atten¬ 
zione: le lineette non vanno digitate, al loro 
posto occorre battere un "due punti") sono 
le locazioni di memoria, vale a dire gli indi¬ 
rizzi dello spazio di memoria in cui il dato 
dovrà essere conservato, e i numeri seguen¬ 
ti sono il contenuto, i dati da memorizzare 
nelle sette locazioni di memoria indicate. I 
due numeri separati da un punto presenti 
nella prima riga indicano gli indirizzi inizia¬ 
li e finali della parte di memoria considera¬ 
ta. Questo programma è la traduzione del 
listato numero tre, scritto in assembly. Co¬ 
me si noterà le colonne a sinistra sono mol¬ 
to simili al listato numero due, contengono 
infatti le locazioni di memoria, mentre la 
parte a destra contiene istruzioni in assem¬ 
bly. Esistono diversi programmi assembler 
e diverse disposizioni dei listati, ma in tutti 
sono presenti queste due diverse colonne. 


1 *RINGER PROGRAM 



2 ORG 

$300 


3 BELL EQU 

$FBDD 

0300: A2 05 

4 LDX 

#$5 

0302: 20 DD FB 5 LOOP JSR 

BELL 

0305: CA 

6 DEX 


0306: F0 03 

7 BEQ 

END 

0308: 4C 02 03 

8 JMP 

LOOP 

030B: 60 

9 END RTS 



Listato 3 



Per inserire i listati nella macchina è suf¬ 
ficiente eseguire le seguenti operazioni: 

1) Digitare CALL-151 Return per en¬ 
trare in contatto con il System Monitor, poi 
inserire la locazione di memoria, i due pun¬ 
ti e il contenuto della memoria; nel caso del 
listato numero due ad esempio si digiterà: 


300:A2 05 20 DD FB CA F0 03 Return 
308:4C 02 03 60 Return 


Un programma in Assembler sarà invece 
così inserito: 


300:A2 05 Return 
302:20 DD FB Return 
305:CA Return 
306:F0 03 Return 
308:4C 02 03 Return 
30B:60 Return 


State attenti a non inserire lo spazio tra i 
due punti e il primo numero seguente, 
mentre invece bisogna mettere lo spazio fra 
le coppie di numeri. 

2) Una volta inserito l’intero listato, 
schiacciate CTRL-C Return per tornare al 
livello BASIC indicato dal segno ’]’. 

3) Al contrario dei programmi in BASIC 
che iniziano nella stessa locazione di me¬ 
moria, e che possono essere salvati con un 
semplice SAVE, i programmi scritti in lin¬ 
guaggio macchina possono iniziare in di¬ 



versi punti della memoria. Per salvare lista¬ 
ti o dati in linguaggio macchina si dovrà 
indicare quindi la locazione alla quale ha 
inizio il programma da salvare e la lunghez¬ 
za dello stesso (in decimale o in esadecima¬ 
le). Per il programma usato prima come 
esempio, il comando sarà: 


BSAVE RINGER, A$300, L$C 


dove A$300 è la locazione di memoria di 
inizio programma e L$C è la lunghezza del 
programma (la lettera C corrisponde al nu¬ 
mero decimale 12). All’inizio dei listati in 
linguaggio macchina pubblicati su Appli¬ 
cando troverete sempre l’indicazione della 
locazione di memoria di inizio e fine pro¬ 
gramma; esempio: 300.3EA mentre nel 
corso dell’articolo troverete i parametri per 
salvare il programma, esempio: BSAVE 
RINGER, A$300,L$C. 

4) Per rivedere il listato che avete tra¬ 
scritto basterà battere 300.30B, e sullo 
schermo si riprodurrà tutto ciò che avete 
battuto. Per ottenere una copia sulla stam¬ 
pante, basterà battere PR # (£ se siete in 
tastiera italiana) seguito dal numero dello 
slot al quale avete collegato la stampante 
(normalmente il n. 1) Return e poi ancora 
300.30B Return. Le correzioni si fanno ri¬ 
battendo solo la riga contenente eventuali 
errori. 

5) Per far girare il programma basterà 
allora digitare BRUN RINGER, senza 
l’indirizzo. 

Quanto esposto sopra è valido sia per il 
DOS 3.3 (sistema operativo per la gestione 
del drive che veniva fornito prima dell’usci¬ 
ta del //c) sia per il ProDOS (sistema opera¬ 
tivo fornito con il //c). Usando il ProDOS 
occorre però fare alcune precisazioni. 

I comandi del tipo SAVE, LOAD, 
RUN, CATALOG, ecc. vengono accettati 
anche in forma minuscola. 

Per formattare un disco non si potrà più 
usare il comando INIT HELLO, ma sarà 
necessario usare il disco UTILITIES di Si¬ 
stema fornito con il computer. Durante 
questa operazione vi verrà chiesto se il no¬ 
me del disco, assegnato automaticamente 
dal computer, va bene oppure se volete 
cambiarlo. Infatti tutti i dischi formattati in 
ProDOS (indicati come Volume) hanno un 
nome e vengono riconosciuti indicando 
questo nome dopo un comando diretto al 
drive. Per esempio se volete vedere il cata- 
log di un disco chiamato BLANK, dovete 
battere CAT/BLANK. 

Per non ripetere continuamente il nome 
del disco potete battere, prima dei comandi 
diretti al drive, PREFIX/nome disco segui¬ 
to da RETURN. Da questo momento tutti 
i comandi al drive saranno diretti automati¬ 
camente al disco scelto. 

Per vedere il catalog è sufficiente battere 
CAT. 

Durante l’uso di alcuni programi scritti in 
ProDOS potreste trovarvi una richiesta del 
tipo "PATHNAME?"; non spaventatevi, il 
pathnàme è il nome del disco al quale vo¬ 
gliamo fare riferimento, scritto entro due 
barrette (/) e seguito dal nome del file che 
vogliamo salvare o caricare in memoria op¬ 
pure trasferire da un disco a un altro. 
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scuola 


Nel numero di Applicando di questo mese trova spazio un m u 1,11 

<3^ altro programma contenuto nel Progetto Seraphim, il Sple^B! 
software studiato negli Stati Uniti e importato per iniziativa WLE ,/c 
dell’università di Bologna, dedicato all’insegnamento 
della chimica con il computer. Di scena questa volta sono 
le leggi della cinetica chimica, nella simulazione di un 
esperimento di laboratorio. 


Simulazione 
di un equilibrio 


C ontinua la pubblicazione della se¬ 
lezione di programmi estratti dal¬ 
la versione italiana del progetto Serap¬ 
him, che fornisce il supporto software 
per Tinsegnamento della chimica negli 
istituti medi superiori. Il programma 
scelto per questo numero si chiama 
"Simulazione di un equilibrio", fa par¬ 
te, insieme ad altri tre programmi del 
dischetto "Cinetica ed equilibrio" e, 
come vedremo, consentirà di eseguire 
sul computer un interessante esperi¬ 
mento di laboratorio. 


Lo studio delTequilibrio chimico è 
uno dei punti centrali di un corso di 
chimica di base per le connessioni con 
numerosi altri capitoli della chimica. 
Come per quasi tutti gli argomenti di 
chimica, anche questo andrebbe af¬ 
frontato con il supporto dell’esperi- 
mento di laboratorio, poiché sebbene 
tutte le reazioni chimiche possano es¬ 
sere adeguatamente illustrate qualita¬ 
tivamente in aula, l'esperienza di una 
valutazione quantitativa diretta si ri¬ 
vela indispensabile per comprensione 


approfondita dei processkphe inter¬ 
vengono. A questo scopo il calcolato¬ 
re può essere un valido strumento per 
simulare quegli esperimenti che per 
praticità o per carenza di strutture non 
possono essere realizzati fisicamente. 
Inoltre la simulazione, rispetto aire- 
sperimento reale, offre alcuni interes¬ 
santi vantaggi, per esempio può essere 
ripetuta quante volte si desidera anche 
senza la presenza del docente. 

Nel nostro caso il programma forni¬ 
sce dati quantitativi su una reazione di 


Listato 


2020 

2030 

2040 

2050 

2040 

2070 

2080 

2300 

2310 

2320 

2330 

2331 

2332 

2333 
2335 

2340 

2341 


REM .SIMULAZIONE DI EQUILIBRIO 

REM . 

REM . 

REM .DAVID ROBSON. 

REM .T0US0N HIGH SCHOOL... 

REM .T0US0N .MARYLAND. 


REM 


. .MAGGI 0,1982. 


INFORMAZIONI PER L'UTENTE 


REM 
TEXT 
HOME 

VTAB 6: PR1NT TAB( B)'****»*»*******#**»»**»»»******' 

PRINT : PRINT TAB( 10)*SIMULAZ10NE DI UN EQUILIBRIO 1 
PR1NT : PRINT TAB( 8) , »****«******»«*«*«***«**«* 1 : PRINT : PRINT 
PRINT : PRINT : PRINT TAB< 8)'DAVID ROBSON, TOUSON HIGH 1 : PRINT TAB( 8)'SCH00 
L. TOUSON. MD.21204* : PRINT : PRINT 'TRADUZIONE DI G.MORTA E D.PERUGINI 1 
2342 OiAB 22: PRINT 'PREMI LO SPAZIO PER CONTINUARE 1 : GET SS: 1F SS < > CHRS (321 
THEN GOTO 2342 
2350 HOME 

2390 PRINT : PRINT : PRINT 'NELLA REAZIONE QUI SIMULATA I REATTIVI SONO: 1 
2392 PRINT 

2395 PRINT 1 ACIDO ACETICO ♦ ETAN0L0+ 

2397 PRINT : PRINT 1 I PRODOTTI SONO: 1 : PRINT : PRINT 1 ACQUA ♦ ACETATO DI E 

T1LE 1 

2400 PRINT : PRINT : PRINT 'L'ACQUA SARA TRASCURATA PERCHE' FACENDO LA REAZI 

ONE IN SOLUZIONE ACQUOSALA SUA CONCENTRAZIONE NON CAMBIA IN MODOAPPREZZABILE* 
2410 VTAB 23: PRINT 'PREMI LO SPAZIO PER CONTINUARE 1 : GET SS: IF SS < > CHRS *32) 
THEN 2410: HOME 
HOME 

PRINT : PRINT : PRINT 'QUMDO SI ESEGUE QUESTA REAZIONE IN LAB ORATORIO, E SSA 

PROCEDE LENTAMENTE E RICHIEDE DIVERSE ORE PER RAGGIUNGERE L'EQULIBRI0 . 1 
PRINT : PRINT "IN QUESTO PROGR#™ LA REAZ1 ONE SIMULATA PROCEDE CIRCA 120 VOLTE 
PIU' VELOCE. LE CONCENTRAZIONI DEI PRODOTTI SARAMO MOSTRATE AD INTERVALLI 
CHE TU POTRAI SPECIFICARE. 1 

VTAB 23: PRINT 'PREMI LO SPAZIO PER CONTINUARE* : GET SS: IF SS < > CHRS <32) 
THEN 2430: HOME 
HOME 
TEXT 
HOME 

PRINT : PRINT 'VUOI CHE I VALORI DI CONCENTRAZIONE 
1 GRAFICAMENTE 7 ' 

PRINT : JNPUT 'SE LI VUOI STAMPATI SCRIVI 
RIVI G' _ E POI 'RETURN";OS 

2517 IF OS < > 'G* AND OS < > 'P' THEN GOTO 2515 

2518 PRINT 


2415 

2420 


2425 


2430 

2435 

2500 

2505 

2510 

2515 


SIANO STIPATI 0 MOSTRAT 
SE LI VUOI IN GRAFICO SC 


2520 

2525 

2530 

2540 

2550 

2560 

2570 

2580 

2590 

2600 

2601 

2602 

2605 

2610 

2620 

2630 

2750 

2760 

2800 

2810 

2820 

2830 

2840 

2850 

2860 

2870 

2880 

2890 

2^00 

2910 

2920 

2930 

2940 

2950 

3000 

3010 

3030 

3040 

3050 

3060 

3070 

3080 

3090 

3100 

3110 

3120 


INPUT 'SCRIVI IL NUMERO DI MINUTI PER OGNI CICLO (DA 1 A 10 MINUTI)';PM 
IF PM < 0 OR PM > 10 THEN GOTO 2520 
IF PM = INT (PM) THEN GOTO 2550 

PRINT : PRINT 'SOLO NUMERI INTERI PER IL TEMPO 1 ": PRINT : GOTO 2520 

PRINT : INPUT 'METTI IL VALORE INIZIALE DELLA CONCENTRAZIONE MOLARE DE 

LL'ACIDO ACETICO(DA 0 A 3)':A 

IF A < 0 OR A > 3 THEN GOTO 2550 

PRINT : INPUT 'METTI IL VALORE INIZIALE DELLA CONCENTRAZIONE DELL'ETÀ 

0L0 (DA 0 A 3) ';B 

IF B < 0 OR 8 ) 3 THEN GOTO 2570 

PRINT : INPUT 'METTI IL 'VALORE INIZIALE DELLA CONCENTRAZIONE MOLARE DE 

LL'ACETATO DI ETILE (DA 0 A 3)';C 

IF C < 0 OR C > 3 THEN GOTO 2590 

IF A = 0 AND 8=0 AND C = 0 THEN GOSUB 4600 

IFA = OANDC=OORB=OANDC=0 THEN GOSUB 4600 

HOME 

Q = A 

R = B 

S = C 

REM VALORI DELLE COSTANTI 01 VELOCITA' DIRETTA E INVERSA: 

KF = 2.38E - 4 
KR = 8.15E - 5 

REM ACCELERAZIONE = 10 

KF = KF * 10 
KR = KR * 10 

REM RIDUCE PS PER IL FATTORE DI ACCELERAZIONE DEL TEMPO 
PS = PM * 60 / 10 

REM FATTORE DI ACCELERAZIONE USATO OCHE ALLA LINEA 810 


T = 0 
COUNT = 0 

ÌF OS = 'P' THEN GOTO 3150 
HGR 

REM CONTORNO DEL GRAFICO DI EQUILIBRIO 
REM STABILISCE IL COLORE DEL CONTORNO 
HC0L0R= 6 

HPLOT 0,0 TO 279,0 TO 279,159 TO 0,159 TO 0,0 
HPLOT 1,1 T0 278.1 T0 278,158 TO 1,158 T0 1,1 
HPLOT 1.101 TO 278.101 
REM CALIBRA L'ASSE Y 

HPLOT 1,21 T0 8,21: HPLOT 271,21 TO 278,21: HPLOT 1,41 TO 8,41: HPLOT 271,41 TO 
278.41: HPLOT 1,61 TO 8,61: HPLOT 271,61 T0 278,61: HPLOT 1,81 TO 8,81: HPLOT 
271,81 TO 278,81 
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II progetto Seraphim è sorto negli Stati Uniti allo scopo di diffondere e 
stimolare V impiego del computer nell'insegnamento della chimica. Nel proget¬ 
to si è inserita la Divisione di Didattica Chimica, che ne cura la distribuzione 
nelle scuole italiane interessate. L'intero software, costituito da 44 programmi 
didattici e da 10 utility, è scritto per calcolatori Apple. L'iniziativa non si 
prefigge scopi di lucro: i dischetti, contenenti diversi programmi, sono in 
vendita a lire 7.000 + IVA ciascuno. Per ogni ulteriore informazione sul 
progetto e sulle modalità di acquisto dei dischetti rivolgersi al prof. Giuseppe 
Innorta. Istituto Chimico "Ciamician", via Selmi 2, 40126 Bologna. Iprogram¬ 
mi pubblicati da Applicando sono invece aggiunti nei dischetti del Disk Servi¬ 
ce, senza aggiunta di prezzo. 


equilibrio sfruttando la capacità di 
comprensione del tempo del calcola¬ 
tore. In particolare viene simulata la 
reazione tra acido acetico ed etanolo 
con formazione di acetato di etile e 
acqua; si tratta di una reazione abba¬ 
stanza semplice del tipo: 

FI A 4- B C 

Per la quale vengono assunte le se¬ 
guenti leggi cinetiche: 

F2 V = 2.38 * IO' 4 [A] [B] 
per la reazione diretta 
F3 V = 8.15 * IO 5 [C] 
per la reazione inversa 

Poiché la reazione avviene in am¬ 
biente acquoso, la formazione di ac¬ 
qua può essere trascurata. 

Sebbene il modello cinetico sia mol¬ 
to semplificato, la simulazione con¬ 
sente di ricercare quelle regolarità ma¬ 
tematiche fra le concentrazioni di 
equilibrio che facilitano la compren¬ 
sione del significato di una costante di 
equilibrio. 

Il listato 

2020-2600 Vengono visualizzate le 
informazioni inerenti alla simulazione 
e vengono accettati, per mezzo di in¬ 
put controllati, i dati d’ingresso. Pote¬ 
te scegliere il grado di concentrazione 
iniziale delle tre sostanze, specifican¬ 
do un valore tra 0 e 3, decidere se 


avere una rapprentazione grafica della 
reazione o soltanto i valori numerici e 
infine decidere il tempo tra una rivela¬ 
zione e la successiva. 

2605-3000 Vengono stabiliti i valori 
delle due costanti di velocità e il fatto¬ 
re di accelerazione della reazione. 
3000-3200 Viene disegnato il contor¬ 
no del grafico e visualizzati valori nu¬ 
merici delle concentrazioni. 
3500-3950 Questo ciclo calcola, in ba¬ 
se alle equazioni cinetiche, la variazio¬ 
ne di concentrazione di ogni sostanza 
nell’unità di tempo. Tale calcolo viene 
ripetuto per ogni rilevamento fino al 
raggiungimento della condizione di 
equilibrio. 

3960-4296 Vengono eseguite le ap¬ 
prossimazioni dei valori calcolati e se¬ 
lezionata la routine di output scelta 
all’inizio dall’utente. 


4300-4480 Realizza l’aggiornamento 
della rappresentazione grafica della 
reazione. 

4500 II calcolatore decide se è stata 
raggiunta la situazione di equilibrio, in 
caso contrario ripete il ciclo di calcolo 
per un altro rilevamento. 

Per ottenere l’output su stampante è 
sufficiente aggiungere queste due li¬ 
nee: 

3165 PR#1 (se la stampante è collega¬ 
ta alla slot 1) 

4528 PR#0 

La rappresentazione grafica è suffi¬ 
cientemente adatta per visualizzare il 
raggiungimento della situazione di 
equilibrio, naturalmente potete sem¬ 
pre perfezionare il programma esten¬ 
dendo così notevolmente l'interesse 
didattico dell'esperimento. 

Giuseppe Innorta 


3150 

3155 

3160 

3170 

3180 

3188 

3190 

3192 

3200 

3500 

3510 

3520 

3550 

3560 

3570 

3575 

3700 

3710 

3720 

3730 

3740 

3750 

3760 

3770 

3780 

3790 

3800 

3810 

3820 

3830 

3840 

3850 

3860 

3870 


IF 0* = *G* THEN GOTO 4240 

REM TITOLI 

HOME 

PRINT : PR1NT TABI 3>*TEMP0* TABI 19)•CONCENTRAZIONE* 
PR1NT '(MINUTI)* TABI 17)*(MOLI PER LITRO)* 

PRINT 

PRINT TABI 12)•ACIDO* TABI 21)*ETM0L0* TABI 32)'ETILE* 
PRINT TABI 12)'ACETICO* TABI 32)‘ACETATO* 

PRINT : PRINT TABI 4)T; TABI 14)A; TABI 24)B; TABI 34)C 
REM INIZIO DEL CICLO DI CALCOLO 
F0R I = 1 T0 PS 

REM ...CALCOLA LA DIMINUZIONE DEI REAGENTI 
RDEC = A * B * KF 
ADEC = RDEC 
BDEC = RDEC 

REM ...CALCOLA LA DIMINUZIONE DEL PRODOTTO 
CDEC = C * KR 

REM ...CALCOLA L'AUMENTO DEI REAGENTI 
AINC = CDEC 
BINC = CDEC 

REM ...CALCOLA L'AUMENTO DEL PRODOTTO 
CINC = RDEC 

REM .. .CALCOLA LE NUOVE CONCENTRAZIONI : 

A = A ♦ AINC - ADEC 
B = B + BINC - BDEC 
C = C 4 CINC - CDEC 


RF = RDEC 
RR = CDEC 


3900 : 

3930 REM AGGIUNGE IL FATTORE DI ACCELERAZIONE DEL TEMPO 
3940 T = T 4 io 
3950 NEXT I 
3960 TM = T ./ 60 

3970 CAPPR = < INT <C * 1000)) / 1000 

3<?80 BAPPR = I INT <8 ♦ 1000)) / 1000 

3990 AAPPR = I INT IA » 1000)) / 1000 

4210 IF 0» = *G* THEN GOTO 4240 

4220 PRINT 

4230 PRINT TABI 4>TM:: TABI 14)1 INT IA « 1000)) / 1000; TABI 24)1 INT (B * 1000)) 

/ 1000; TABI 34)CAPPR 
4235 1F 0$ = *P* THEN GOTO 4500 

4240 HOME : VTA8 21 

4241 PRINT TABI 2)*A.ACET1C0*; TABI 13)*ETM0L0*; TABI 24)*ETILE ACET.*; TABI 37)*M 
IN.* 


4243 

4246 

4247 

4249 

4250 
4294 
4296 
4300 
4305 

4310 

4311 
4320 
4330 
4340 
4350 
4360 

4370 

4371 

4372 
4380 
4385 
4390 
4400 
4410 
4420 
4424 
4426 
4430 
4440 
4450 
4460 
4470 
4480 

4485 

4486 

4487 

4499 

4500 
4510 
4520 

4525 

4526 

4527 
45S0 
4535 
4540 

4543 

4544 

4545 
4600 


P0KE 34,21 

IF COUNt = 0 THEN PRINT TABI 6);Q; TABI 14);R; TABI 28);S; TABI 38);*0* 
C0UNT = COUNT ♦ 1; IF COUNT = 1 THEN GOTO 4300 
VTAB 22 

PRINT TABI 6)AAPPR; TABI 14)BAPPR; TABI 28)CAPPR; TABI 38)TM 


REM DISEGNA LE SBARRE 

REM FATTORE DI SCALA PER LE SBARRE = 20 


REM DISEGNA LA SBARRA A 
HC0L0R= 4 

HPL0T 61,101 T0 61.AY T0 35,AY T0 35,101 
AY =101-1 INT IA * 20)) 

HC0L0R= 1 

HPLOT 61,101 T0 61,AY T0 35,AY T0 35,101 


REM DISEGNA LA SBARRA B 
HC0LQR= 4 

HPLOT 116,101 T0 116,BY T0 90,BY T0 90,101 
BY =101-1 INT (B * 21)) 

HC0L0R= 2 

HPLOT 116,101 T0 116,BY T0 90,BY T0 90,101 


REM DISEGNA LA SBARRA C 
HC0L0R= 4 

HPLOT 211,101 T0 211,CY TO 185,CY T0 185,101 
CY =101-1 INT (C * 20)) 

HC0L0R= 5 

HPLOT 211,101 TO 211.CY T0 185,CY T0 185,101 

IF COUNT > 1 THEN GÓT0 4499 

VTAB 24: PRINT 'PREMI LO SPAZIO PER CONTINUARE* 

GET S$: IF S$ < > CHR$ (32) THEN GOTO 4487 
VTAB 24: IF CAPPR = 0 THEN GOTO 3500 
IF CAPPR = C2APPR THEN GOTO 4525 
C2APPR = CAPPR 
GOTO 3500 

POKE 34,22: PRINT ** 

VTAB 24: PRINT * — EQUILIBRIO —■ 

FOR PAUSE = 1 TO 3000: NEXT PAUSE 
VTAB 24: PRINT *'R' PER RIPETERE..'Q' PER SMETTERE* 
GET R* 


IF R$ < ) *R* AND RI < 
COUNT = 0: POKE 34,0 
IF R$ = *Q* THEN END 
RUN 2435 

HOME : IMMERSE : FLASH 


1 THEN GOTO 4535 


PRINT ‘MANCA UN REATTIVO ESSENZIALE*: PRINT 'PROVA DI 


NUOVO*: N0RMAL : FOR I = 1 TO 3000: NEXT : HOME : GOTO 2550 
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pratica 


Inizia da questo numero una nuova rubrica che ha lo scopo di aiutare i lettori a utilizzare meglio il loro computer, a 
capire quali periferiche o quale software possono essere veramente utili nel risolvere i loro problemi specifici, 
soprattutto nel campo aziendale. La stesura di questa rubrica è affidata ad Alfonso Scopetta , 32 anni, laureato in 
scienze fisiche. Scopetta , product manager per la linea Apple presso la New Line , ha occupato per quattro anni la 
cattedra di fisica applicata e informatica presso l’Istituto professionale sperimentale di Bollate (MI) ed è stato 
consulente tecnico e responsabile delle vendite presso alcuni rivenditori autorizzati Apple. Quesiti e richieste 
d’informazioni vanno indirizzati ad Applicando, rubrica Applipratica, Corso Monforte 39 , 20122 Milano. 


Fuori dal limbo 

Dopo tanti sussurri e tanti "si dice..ecco le sospira¬ 
te novità in casa Apple. Non staremo a elencarne le 
caratteristiche (che peraltro sono già state ampiamente 
sviscerate nel numero di settembre e completate nel- 
l’Applicosa di questo numero), ma cercheremo di co¬ 
gliere gli aspetti tecnici in relazione a sviluppi e benefici 
che potrete trarne. 

Le novità più grosse riguardano per la maggior parte 
il settore hardware, in quanto potenziano notevolmen¬ 
te le due maggiori linee di prodotti: Macintosh e Apple 
//. Tuttavia questa "grande abbuffata", se da un lato fa 
felice chi già possiede una di queste macchine, d’altro 
canto può mettere in crisi chi vorrebbe acquistarne 
una. Vediamo quali potrebbero essere le configurazio¬ 
ni ottimali, soprattutto per chi utilizza Apple per il 
lavoro. 

Per quanto riguarda il Mac sono stati presentati -di¬ 
schi rigidi e rete. Tra i modelli di disco rigido che sono 
disponibili, merita uno sguardo particolare il Sunol da 
20 Mbyte, soprattutto per la sua capacità di collega¬ 
mento in rete Apple Talk (AT). Un altro disco rigido di 
tutto rispetto è quello da 20 Mbyte prodotto e distribui¬ 
to dalla stessa Apple, che tuttavia per ora non è collega¬ 
bile alla rete AT. 

È ovvio che l’hard-disk Sunol, distribuito dalla Ce- 
sac nei modelli da 20,40,60 e 110 Mbyte, è indirizzato a 
una grande azienda che voglia strutturarsi con una rete 
di svariati Macintosh collegati tra loro e che possano 
condividere varie periferiche, come questo hard-disk, 
una LaserWriter, eccetera. L’hard-disk da 20 Mbyte 
della Apple, invece, è rivolto principalmente al singolo 
professionista o alla piccola-media azienda che in tal 
modo può memorizzare grandi volumi di dati. Chissà 
che in un futuro non troppo lontano possa essere colle¬ 


gabile alla rete AT! 

Per quanto riguarda invece la linea Apple // le novità 
sono estremamente più importanti, perché fanno usci¬ 
re questi personal dal "limbo hobbistico evoluto" per 
proiettarli verso una fascia molto più professional^ dal 
punto di vista tecnologico e di utilizzo. 

Innanzitutto con i nuovi drive da 800 Kbyte final¬ 
mente si potranno utilizzare programmi gestionali (ti¬ 
picamente contabilità, gestioni aziendali, paghe e sti¬ 
pendi...) molto più ampi e flessibili: infatti se prima con 
un buon programma di contabilità si potevano gestire 
500 clienti/fornitori, 300 voci del piano dei conti e 1.200 
movimenti contabili, con due dischetti da 5" e 1/4 per un 
totale di 320 Kbyte, ora si potrà strutturare una conta¬ 
bilità quattro volte maggiore sfruttando due drive da 3" 
e 1/2 per un totale di 1,6 Mbyte. 

L’altra grossa novità per la serie //e è la scheda da 
256K ram che può essere espansa fino a 1 Mbyte; anche 
questa scheda favorirà lo sviluppo di buon software, e si 
spera a basso costo, per un utilizzo estremamente pro¬ 
fessionale di questo cavallo di battaglia della Apple 
Computer. 

Un'ultima parola sulla nuova stampante Apple Ima- 
geWriter II. Questa periferica si presenta come un nuo¬ 
vo gioiello per le sue caratteristiche, infatti riunisce le 
già pregevoli performance della "vecchia" ImageWriter 
ad alcune migliorìe: innanzitutto è possibile utilizzare 
questa periferica in una rete AT, quindi può diventare 
un supporto notevole per chi vuole avere più Mac in 
rete ma non può o non vuole avere una LaserWriter, 
oppure vuole affiancare a quest’ultima una stampante 
ad aghi tradizionale; inoltre un ottimo optional per 
questa stampante è un efficiente inseritore automatico 
di fogli singoli a basso costo. Queste caratteristiche, 
unite a un carattere di stampa estremamente elegante, 
fanno della nuova ImageWriter // una periferica molto 
professionale a basso costo. Alfonso Scopetta 



• Disk drive da 640 K formattati per sistemi operativi DOS 3.3*, ProDos*, Pascal*, CP/M* 

• Controller per due disk drives da 640 K o da 143 K 

• AM 10 buffer programmabile (spooler) da 64 a 256 K 

• Interfaccia Macintosh*/Apple Ile* - stampante grafica standard Centronics* 

• Espansioni di memoria da 128 K RAM, gestiti con disco virtuale 

• marchi registrati p\ ^r-jr-y-, 

In vendita presso i migliori Z^SlÉuUs.pa. 

computer shop Buia/ud tei. 0432-961014m450608 
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Freccette 
senza padelle 

Ho 18 anni e frequento 
l’ultimo anno del liceo scien¬ 
tifico. Possiedo da due anni 
circa un Apple//e ma da un 
po’ di tempo avevo perso 
l’entusiasmo iniziale poiché 
non avevo una guida. Gra¬ 
zie alla vostra rivista ho ri¬ 
trovato quell’entusiasmo 
iniziale. Vi ringrazio viva¬ 
mente e, facendovi i miei 
complimenti, vi chiedo un 
piccolo favore. Ho copiato il 
listato del gioco "Freccette" 
pubblicato su Applicando 
n.5, ma non ho le paddle: vi 
prego quindi, se vi è possibi¬ 
le, di inviarmi una modifica 
o di pubblicare, almeno, su 
un prossimo numero di Ap¬ 
plicando questa mia richie¬ 
sta. In attesa di una vostra 
risposta vi ringrazio viva¬ 
mente e vi faccio i miei mi¬ 
gliori auguri. 

Giambattista Giordano 

S. Arcangelo (PZ) 

Il programma indicato, 
essendo stato scritto per Ap¬ 
ple II, utilizza le paddle solo 
per poter azionare i pulsanti. 
Forse non tutti sanno che 
nell’Apple!le e Ile i tasti Mela 
vuota e Mela piena corri¬ 
spondono esattamente ai 
pulsanti Paddle 1 e Paddle 2. 
Quindi il programma fun¬ 
ziona ugualmente senza Fu¬ 
so delle paddle e senza modi¬ 
fiche. Occorre solo usare i 
tasti sopra indicati. 

Per farli 
comunicare 

Ho letto su BIT del di¬ 
cembre 1984 di una interfac¬ 
cia di comunicazione Ap¬ 
ple-Commodore 64: a che 
cosa serve di preciso? È pos¬ 
sibile far girare sull’Apple i 
programmi (sia in Basic sia 
in linguaggio macchina) del 
Commodore 64 senza dover 
correggere i listati? 

Roberto Nacci 

S. Casciani di Cascina (Pisa) 

Un'interfaccia di comuni¬ 
cazione, come dice la parola 
stessa, serve per comunicare 


con altri computer sempre 
che siano forniti di un'inter¬ 
faccia con le stesse funzioni e 
di un programma di gestione 
della stessa. Si possono tra¬ 
sferire sia listati di program¬ 
mi sia file di testo. Purtroppo 
l'Apple e il Commodore non 
sono totalmente compatibili 
e i listati dei programmi van¬ 
no senz'altro modificati in 
tutto o in parte affinché pos¬ 
sano girare su di un compu¬ 
ter diverso da quello per il 
quale sono stati progettati. 

Un Golf 
sbagliato 

Dall’ultimo numero ho 
copiato il listato del gioco 
del Golf, ma il computer mi 
dà errore del tipo 53 sulla 
linea 1970. Ho rivisto il lista¬ 
to e non ho trovato errori 
fino alla GOSUB che va a 
disegnare i parametri della 
figura; spero inoltre di non 
aver fatto errori nella copia¬ 
tura dei listati in linguaggio 
macchina, anche se secondo 
me non c’entrano un gran 
che con il mio errore. Vi 
chiedo inoltre cortesemente 
di spiegare come si fa a lista¬ 
re un programma in linguag¬ 
gio macchina per controllar¬ 
lo anche dopo essere tornati 
in BASIC, perché per me è 
insufficiente quanto scritto 
su PER CHI COMINCIA. 
Vi ringrazio per le risposte 
complimentandomi per la 
rivista veramente interes¬ 
sante, soprattutto per me 
che sono agli inizi. 

Domenico Ferretti 

Pescara 

Il programma Golf si 
compone di due listati e lei 
non ha indicato a quale si 
riferisce l’errore incontrato. 
Il suggerimento che le pos¬ 
siamo dare è quello di ricon¬ 
trollare attentamente i due li¬ 
stati in Basic e quelli in lin¬ 
guaggio macchina perché il 
programma funziona benis¬ 
simo e, come abbiamo spes¬ 
so spiegato, i listati pubblica¬ 
ti sono la copia fotografica 
del listato originale. 

Per rivedere un listato 
scritto in linguaggio macchi¬ 


na si batte CALL-151 se¬ 
guito da RETURN, per an¬ 
dare in MONITOR. Si scri¬ 
ve la locazione di partenza 
del listato seguita da un pun¬ 
to e dalla locazione finale del 
listato. Battendo RETURN 
si vedrà scorrere sul video il 
listato in linguaggio macchi¬ 
na e si potrà bloccarlo con 
CTRL-S come con i listati 
in Basic. Se invece si vuole 
vedere passo passo il listato 
si batte solo la locazione di 
partenza: a ogni RETURN 
verrà visualizzata una riga 
per volta. 

Writer 
sul //c 

Sono un vostro abbonato 
e ho acquistato un Apple//c 
in sostituzione di un //e, ma 
mi trovo attualmente in dif¬ 
ficoltà perché, avendo da 
anni usato soprattutto il pro¬ 
gramma Apple Writer per il 
//e, ho dovuto constatare la 
scarsa compatibilità di quel 
programma sul nuovo com¬ 
puter. 

Ho trovato in commercio 
un programmino di conver¬ 
sione, ma funziona male e 
solo in parte. 

Ignazio Mastrapasqua 

Roma 

Nella rubrica Applihelp 
del numero di maggio a pag. 
122 abbiamo pubblicato un 
programmino di conversio¬ 
ne per Apple Writer che per¬ 
mette anche di sentire la posi¬ 
zione del commutatore 
80140. 

New York 

Sono un vostro abbonato 
e lavoro con un MAC 512K 
al quale è collegata una Ima- 
ge Writer 80 colonne; spero 
inoltre di potermi procurare 
al più presto il secondo Dri¬ 
ve; provengo da un sistema 
decisamente inferiore e ho 
da sottoporvi alcune que¬ 
stionarne: 

1. So usare la nuova utility 
Font Mover ma non riesco 
ad abilitare il carattere New 
York nei formati 20 e 36 nel¬ 
l’applicazione Mac Write. 
Nello Speciale Macintosh 


del numero di marzo di BIT 
ho letto che i formati mag¬ 
giori sono appannaggio di 
Mac Paint (e di questo chie¬ 
do conferma), ma lo stesso 
articolo non spiega l’impos¬ 
sibilità di usare il formato 
20, visto che il 24 punti è 
perfettamente agibile. 

2. Esiste sul mercato un pro¬ 
gramma di verifica del siste¬ 
ma operativo e delle RAM, 
simile, per esempio, al di¬ 
screto Verify Ram dello 
Spectrum Sinclair? 

3. E possibile installare fa¬ 
cilmente ed efficacemente 
un buffer di stampa 
MAC—compatibile per evi¬ 
tare attese a video "inchio¬ 
dato"? 

Spero in una vostra rispo¬ 
sta, nel frattempo cordialis¬ 
simi saluti 

Giuseppe Castelli 

Torino 

Quello che ha letto su BIT 
è esatto. Il formato dei carat¬ 
teri è quello disponibile sul 
programma Mac Write e non 
è possibile cambiarne la mi¬ 
sura. 

Per le altre domande non 
ci risulta al momento che esi¬ 
sta sul mercato un program¬ 
ma per la verifica delle RAM 
del Mac e per installare un 
buffer di stampa che permet¬ 
ta di lavorare mentre il com¬ 
puter stampa. 

Il cappelletto 

Sono un vostro abbonato 
e devo chiedervi un chiari¬ 
mento sul programma 
GOLF pubblicato sul nume¬ 
ro 14 di Applicando. Alla ri¬ 
ga 2150 vi è un segno che 
non sono riuscito a trovare 
sulla tastiera del mio Apple 
Ile. Vi sarei molto grato se 
poteste dirmi qual è il tasto 
corrispondente. 

Maurizio Barberis 

Il segno incriminato è il 
simbolo usato in informatica 
per indicare l’elevazione a 
potenza. (Per esempio 2 ele¬ 
vato alla seconda si scrive 
2 a 2). Sul Ile è indicato sul 
tasto della i (i accentata), alla 
destra del tasto P, e si batte 
con il tasto SHIFT. 
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Girano sul //c? 

Sono un abbonato e desi¬ 
derei sapere se posso far gi¬ 
rare i seguenti programmi 
del "Disk Service" con il mio 
computer //c: AP7-N12, 
AP10-N14, AP9-N15, 
AP15-N31. 

Vorrei inoltre sapere do¬ 
ve posso trovare alcuni pro¬ 
grammi di Bits & Bytes 
(Utility City e Mechanic) e 
se sono compatibili con il Ile. 

Carlo Massimini 

Dobbiaco 

Tutti iprogrammi in Basic 
fatti per la serie II girano si¬ 
curamente anche sul Ile. I 
problemi si incontrano solo 
con alcuni programmi scritti 
in linguaggio macchina. 
Quindi i programmi com¬ 
presi nei dischetti sopra indi¬ 
cati girano sul Ile. 

Iprogrammi di Bits & By¬ 
tes sono in vendita presso i 
Computer Shop e per sapere 
se sono compatibili con il Ile 
occorre consultare il libretto 
istruzioni allegato. 

I caratteri 
del topino 

Sono un vostro accanito 
lettore in possesso da circa 4 
mesi di un Apple//c e vorrei 
porvi alcune domande. 

1. Sul libro II personal com¬ 
puter Apple/lc di Danny 
Goodman, a p.54, si legge 
che quando si usa il "text 
mode" a 80 colonne sul Ile si 
possono usare anche 32 ca¬ 
ratteri grafici (caratteri del 
Mouse). Si precisa inoltre 
che per poter usare tali ca¬ 
ratteri non è necessario di¬ 
sporre di un Mouse; ma non 
si dice come! È possibile sa¬ 
pere quale procedura segui¬ 
re per poter usare tali carat¬ 
teri? 

2. Sul n.12-13 di APPLI¬ 
CANDO, nella rubrica AP- 
PLETTERE avete indicato 
come attivare le 80 colonne 
neirApple//c. Non mi risul¬ 
ta si debba battere PR a , co¬ 
me da voi asserito, ma bensì 
PR£3 (in modo diretto o in¬ 
diretto) oppure ESC 8 (solo 
in modo diretto). 


3. Sempre su APPLICAN¬ 
DO n.12-13, rubrica AP- 
PLETTERE, fornite le 
istruzioni necessarie per da¬ 
tare i programmi salvati. Ho 
provato e con mia grande 
gioia è risultato tutto OK 
per quanto riguarda la data. 
E l’ora? Si può inoltre sfrut¬ 
tare la data così pokerata in 
memoria per altri program¬ 
mi? Infine tengo a precisare 
che con il computer Ap- 
ple//c viene fornito un di¬ 
schetto di UTILITIES - 
ProDOS 1.0.2 che, come ho 
potuto constatare, grazie ad 
APPLICANDO n.7, non è 
uguale al floppy USER. 
DISK (tra l’altro manca la 
possibilità di introdurre la 
data). 

4. Potete indicarmi un libro, 
possibilmente in italiano, 
dove apprendere l’uso del 
ProDOS e i suoi comandi? 
Ho scoperto a mie spese che 
la gestione dei file su di¬ 
schetto non è uguale a quel¬ 
la operata dal DOS 3.3, ma 
non sono riuscito a capire 
totalmente le differenze 
(che comunque dovrebbero 
essere minime). Compli¬ 
menti per la vostra eccezio¬ 
nale rivista. 

Pier Luigi Galastri 

Firenze 

Nella rubrica Applihelp 
del n.17 a pag.88 troverà 
un'esauriente spiegazione 
dell’uso dei caratteri del 
mouse. 

Per l’attivazione delle 80 
colonne è stato commesso un 
errore di interpretazione del 
carattere di comando da par¬ 
te della fotocomposizione: 
ringraziamo e accettiamo 
ben volentieri l’osservazio¬ 
ne. L’inserimento dell’ora nel 
catalog ProDos è stata spie¬ 
gata nella rubrica Applihelp 
del n.16 a pag.125. Purtrop¬ 
po questo sistema è utilizza¬ 
bile soltanto in ProDos. 

Per il libro sul ProDos 
consigliamo di leggere la pa¬ 
gina delle recensioni librarie 
dove pubblichiamo l’elenco 
dei libri di nuova pubblica¬ 
zione che ci vengono inviati 
in visione. Legga anche la 
rubrica Applihelp dove sicu¬ 
ramente troverà un aiuto. 


é MERCATINO 


• Cerco con urgenza manuale o 
traduzione dattiloscritta in ita¬ 
liano del manuale Visidex per 
Apple IL Oppure un aiuto per 
apprenderne in pieno il funzio¬ 
namento. Dott. Giuseppe Di 
Prima, Viale San Martino 301, 
Messina. Tel. 090/2931961. 

• Vendesi per Apple II dieci 
dischetti, oltre 50 programmi 
tra giochi e utility, tra cui: Az- 
tec, Castle Wolfense, Flight Si¬ 
mulator ecc. Massimo Novero, 
Via Michele Lessona 46/9, 
10145 Torino. 

• Vendo i fascicoli n. 1, 2, 3 e 4 
di Applicando , in perfetto sta¬ 
to. Li spedirò al miglior offeren¬ 
te in contrassegno, più spese 
postali. Umberto Cordier, Ca¬ 
sella postale 269,17100 Savona. 

• Vendo Apple //e (ancora in 
garanzia) + controller con disk 
drive + scheda 80 colonne e 
64K + software vario + joystick 
a lire 1.850.000. Scrivere o tele¬ 
fonare a Luca Fontana, via Ga¬ 
ribaldi 205/a, 20010 Cornaredo 
(MI). Tel. 02/9362410. 

• Per Apple //c cerco urgente¬ 
mente programma alimentare 
per la formulazione e l’ottimiz¬ 
zazione della razione alimenta¬ 
re per bovini e/o suini. Gian¬ 
franco Valeri, Via Nazioale 25, 
46036 Revere (MN). 

• Occasionissima! Causa pas¬ 
saggio sistema superiore vendo 
in blocco Apple //c, monitor To¬ 
no 12 pollici fosfori verdi, soft¬ 
ware valore oltre un milione e 
mezzo (AppleWork, Apple 
Writer, Multiplan, VisiCalc, 
Tool-Kit, Pascal, Forth, Fon- 
trix, Locksmith, Fly Simulator, 
giochi vari e altri, in tutto 30 
dischi), + 16 manuali (Apple¬ 
soft, Dos 3.3, Reference Ma- 
nual ecc.), assicurazione pagata 
per un anno, il tutto per solo 
3.000.000. Franco Braga, Via 
Pasteur 18, 24047 Treviglio 
(BG). Tel. 0363/49221. 

• Vendo Apple II compatibile 
completo delle schede (langua- 
ge, communication, parallela 
per stampante, 80 colonne, 
softeard Z80, disk controller) e 
con 1 drive 5, monitor 9, 40 di¬ 
schi con giochi, programmi e si¬ 
stemi operativi vari, completa 
libreria Apple, in blocco lire 
1.800.000. Giuseppe Romano, 
Via della Pineta 22, 30174 Me¬ 
stre (VE). Telefonare ore serali 
allo 041/610503. 


DELLE MELE É 


• Cerco programmi che sfrutti¬ 
no la doppia risoluzione con 
preferenza ai package grafici, ai 
giochi e alle simulazioni. Scrive¬ 
re solo se seriamente interessa¬ 
ti. Cristina Vaitorta, Via Crespi 
44, 28100 Novara. 

• Vendo Apple //e, 128K, 80 
colonne, scheda z80, due drive, 
monitor Philips, stampante 
Centronics con interfacèi^ gra¬ 
fica, il tutto con manuali e im¬ 
balli. Inoltre vasta scelta di soft¬ 
ware e raccolta completa di Ap¬ 
plicando. Telefonare all’ora di 
cena a Carlo allo 02/2486140. 

• Acquisto numeri 1 e 2 di Ap¬ 
plicando. Prezzo da concorda¬ 
re. Diego Zorzetto, Via S. Ti¬ 
ziano, Trebaseleghe (PD). 

• Vendo le soluzioni delle più 
famose avventure, fra cui Zork 
(tutta la serie), Transilvania, 
Sherwood Forest, Dark Kristal, 
e molte altre. Per una lista gra¬ 
tuita o maggiori informazioni 
scrivere a: Massimo Gilardetti, 
Va Borsi 62, 28100 Novara. 

• Causa passaggio a Ibm vendo, 
in perfetta onestà, circa 700 
programmi, in blocco o singo¬ 
larmente, per Apple serie IL 
Cristina Vaitorta, Via Crespi 
44, 28100 Novara. 

• Apple II Plus 64K vendo, ori¬ 
ginale, perfetto con scheda lan- 
guage 16K, scheda controller 
per due drive, drive originale e 
monitor 12 F.V. a lire 
1.320.000. Super occasione. 
Regalo tastierino numerico e 10 
programmi. Telefonare a Ro¬ 
berto Rossi 02/6070236. 

• Causa passaggio a sistema su¬ 
periore vendo grande quantità 
di software a basso costo. Pro¬ 
grammi come AppleWorks, Pa¬ 
scal 2.0, Jane, Fortran, Ap- 
pleWriter. Giochi come: Sax- 
xon, Congo Bongo, Microbe, 
Sherwood Forest, Masquerade 
e molti altri. Massimo Savazzi, 
Via Carlo Osma 2, 20151 Mila¬ 
no. Tel. 02/3087201. 

• Causa cambio sistema vendo 
Apple //e, marzo 85, usato po¬ 
chissimo, duodisk, scheda 
128K, 80 colonne, Apple mouse 
// con programma MousePaint, 
plotter Roland Dxy-880 (nuo¬ 
vo), sistema Cad/Cam Robo- 
graph 1000, a lire 6.500.000 
trattabili. Telefonare dopo le 
ore 20 a Eugenio Cassani allo 
02/585341. 
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a^ffihelp 


Programmi 

in linguaggio macchina 

A volte può essere necessario conoscere la lunghezza 
di un programma o di una routine in linguaggio macchi¬ 
na per poterla analizzare per intero o per risalvare su 
disco dopo la modifica qualche parametro. 

La locazione di partenza e la lunghezza deirultimo 
programma caricato in memoria sono memorizzate, 
rispettivamente, nelle locazioni $AA72-$AA73 e 
$AA61-$AA6È con l’indicazione del byte basso nella 
prima locazione e byte alto nella seconda (per esempio 
$AA72=5B - $AA73 = 95; l’inizio del programma è 
$95B5). 

Per evitare di battere ogni volta le quattro locazioni 
di memoria su indicate, vi diamo una breve routine che 
vi permette, una volta installata in memoria con il 
comando BRUN, di ottenere i parametri dell’ultimo 
programma in linguaggio macchina caricato in memo¬ 
ria battendo, da MONITOR, CTRL-Y. 

Copiate il listato riportato qui sotto battendo 
CALL-151 per andare in MONITOR; quindi battete 
95B5: A9 B5 85 6F 85 73 A9 95 seguito da RETURN e 
via di seguito. Al termine salvatelo con BSAVE PA¬ 
RAMETRI LM, AS95B5 ,L$4B. 

Questa routine può essere utilmente inserita nell- 
’HELLO del dischetto con l’istruzione PRINT 
CHR$(4); "BRUN PARAMETRI LM" e averla così 
sempre pronta. Nel caso usiate un programma in Ap¬ 
plesoft Basic con l’utility in memoria, occorre proteg¬ 
gerla inserendo, all'inizio del vostro programma, l'i¬ 
struzione HIMEM:38325. 


Listato 

♦95B5.95FF 








95B5- A9 

B5 

85 







95B8- 6F 

85 

73 

A9 

95 

85 

70 

85 


95C0- 74 

A9 

CC 

80 

F9 

03 

A9 

95 


95C8- 80 

FA 

03 

60 

A9 

CI 

20 

E0 


95D0- FD 

A9 

A4 

20 

ED 

F0 

A0 

73 


9508- M 

20 

DA 

FO 

A0 

72 

AA 

20 


95E0- DA 

FO 

A9 

AC 

20 

ED 

F0 

A9 


95E8- CC 

20 

ED 

FO 

A9 

A4 

20 

ED 


95F0- FO 

AO 

61 

AA 

20 

DA 

FD 

AD 


95F8- 60 

AA 

20 

DA 

FD 

4C 

69 

FF 


Listati di programmi 
in linguaggio macchina 

Per stampare un listato in linguaggio macchina è 
sufficiente, una volta attivata la stampante da MONI¬ 
TOR con PR#1, battere la locazione di partenza del 
programma (in esadecimale) seguita dal punto e dalla 
locazione di fine programma più uno (per esempio 
801.23FF). 

Se invece vogliamo listare su stampante il disassem¬ 
blato dello stesso programma, occorre sempre attivare 
la stampante da MONITOR, quindi battere la locazio¬ 
ne di partenza seguita dalla lettera L o da tante lettere L 
di seguito a seconda di quanto presumiamo sia lungo il 
listato che ci interessa. Avremo così la stampa di venti 
righe di listato, nel primo caso, oppure di un numero di 
righe uguale al prodotto del numero delle L per venti 
(questo è il numero delle righe corrispondenti a ogni 
lettera L). 


Per rendere la cosa più semplice e non avere una 
sfilata di L sulla stampante all’inizio del listato, esiste 
una scorciatoia: se inseriamo, con l’istruzione POKE, 
nelle locazioni di memoria 58 e 59 (in decimale) l’indi¬ 
rizzo di partenza del nostro listato (prima il byte basso, 
poi il byte alto), possiamo avere su monitor o su stam¬ 
pante venti righe di listato battendo CALL -418 oppu¬ 
re 256 linee di listato continue battendo CALL -413. 
Se il nostro programma è più lungo di 256 linee, al 
termine di esse dobbiamo battere solo CALL-413. Se 
abbiamo il listato sul video, possiamo sospendere lo 
SCROLL con CTRL-S come con i listati in Basic. 

Ecco un esempio. Se vogliamo listare il disassembla¬ 
to di un programma il linguaggio macchina che inizia 
alla locazione $3200 (in esadecimale), dobbiamo batte¬ 
re da Basic, senza andare in MONITOR, POKE 58,0: 
POKE 59,50: CALL—413 e avremo 256 linee di listato. 
Per calcolare il valore in decimale dell'indirizzo di par¬ 
tenza si divide il numero esadecimale in due gruppi di 
due cifre partendo da destra, quindi si moltiplica la 
cifra di sinistra di ciascun gruppo per 16 e si aggiunge la 
cifra di destra. Per esempio: in $320 = 03 20 = 3 32,32 è 
il byte basso e si scrive in POKE 58 mentre 3 è il byte 
alto e si scrive in POKE 59. 


Problemi con ImageWriter? 

Stampando con il Mac può capitare un testo interse¬ 
cato da linee bianche come indicato qui sotto nella foto. 
Subito penserete a un difetto del programma, o, peg¬ 
gio, del computer. Nulla di tutto questo; esse sono 
dovute alla testina della stampante bloccata in parte dai 
residui del nastro. Occorre togliere la cartuccia del 
nastro e smontare la testina dal suo alloggiamento co¬ 
me indicato a pag.29 dell'IMAGEWRITER USER'S 
MANU AL allegato alla stampante. Pulire la testina 
con uno straccetto imbevuto di alcol, rimontare la testi¬ 
na, rimontare la cartuccia nastro e ristampare il testo. 



ImageWriter e //c 

I parametri di default dell’uscita seriale dell’Apple 
//c per la stampante contemplano un A CAPO DOPO 
80 CARATTERI. Usando l’Apple Writer, se vogliamo 
stampare con il carattere piccolo (17 cpi), non è suffi¬ 
ciente spostare il margine destro per stampare più di 80 
caratteri di seguito, ma occorre inserire all’inizio del 
testo un CTRL I e il numero dei caratteri in questa 
sequenza: 

CRTL V CTRL I 132N CTRL V. 

Un’altra soluzione è quella di settare l’uscita stam¬ 
pante usando il disco UTILITY di SISTEMA all’accen¬ 
sione del computer. 
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M. DI1K SERVICI 


Applicando è lieto di offrire ai propri lettori la possibilità 
di sottoscrivere un abbonamento a 5 o 10 dischetti, a scelta 
fra tutti quelli presentati nel Disk Service, a un prezzo 
eccezionalmente vantaggioso: 

100.000 lire per 5 dischetti 
180.000 lire per 10 dischetti 


In pratica pagherete, rispettivamente, 20.000 lire o 
18.000 lire a dischetto, Iva e spese di spedizione comprese 

qualunque sia il prezzo di vendita del singolo dischetto 


Basta che compiliate il tagliando qui sotto e lo inviate 
a Applicando, abbonamenti Disk Service, Corso Monforte 
39, 20122 Milano, unitamente a un assegno non trasferibile 
intestato a Editronica srl e al vostro primo ordine. Per 
ordinare i dischetti, adesso e successivamente, utilizzate 
il buono d'ordine pubblicato alla pagina seguente, 
specificando sempre che siete un abbonato del Disk Service. 
L'abbonamento non ha una scadenza, e quindi i 5 o 10 
dischetti potete ordinarli nell'arco di tempo che più vi 

aggrada. 

Sì, desidero sottoscrivere il seguente abbonamento: 
[ | 5 dischetti, per un importo di 100.000 lire 

| 1 10 dischetti, per un importo di 180.000 lire 


—' . . . 

Nome. 


Cognome 
Indirizzo - 
CAP_ 


Città 


PV 


Data 


Firma 




















applicando 


Disk Service 



-\ 




Listati senza fatica 

Tutti i programmi di Applicando possono essere trascritti e quindi salvati su 
dischetto. Ma la trascrizione è lenta e noiosa, e sbagliare fin troppo facile. 

Ecco perché Applicando offre, già pronti, i dischetti con i programmi 
sottoindicati: per ottenerli, è sufficiente inviarci il tagliando debitamente 
compilato. 


APPLICANDO 1 

AP1/I02 Profitti. In tempo reale l’analisi del break-even point, punto di 
pareggio, di una qualsiasi azienda. Calendario perpetuo. Dal 1582 in 
poi tutto quello che si può sapere sui giorni passati e futuri. I tronchi 
del tesoro. Una spericolata caccia al tesoro a nuoto, fra le insidie di 
tronchi galleggianti. Lire 30.000 (abbonati 25.000). 

AP1/N03 Eliminatore di Dos. Uno strumento per aumentare del 10% 
la capacità di un normale floppy disk. Orologio. Per trasformare 
l’Apple // in un orologio con rintocchi, allarme e lancetta dei secondi. 
Pronti puntare fuoco! Guardiano di un castello abbandonato, hai 25 
colpi da sparare contro gli intrusi. Lire 30.000 (abbonati 25.000). 

APPLICANDO 2 

AP2/IN04 Costi chilometrici auto. Un programma per calcolare e 
confrontare i costi di qualunque auto. Richiamafigure. Posizionare, 
ingrandire, ruotare, cambiar colore, aggiungere figure a quelle di una 
tavola. Laser nello spazio. Battaglia a colpi di laser contro asteroidi e 
alieni per difendere la torretta spaziale. Lire 30.000 (abbonati 25.000). 

APPLICANDO 3 

AP3/IN05 Sistema base. Un data base modulare con tutte le caratteri¬ 
stiche essenziali per mettere ordine nei propri archivi. Etichette. Eti¬ 
chette spiritose e bizzarre, di lavoro o di ogni genere, stampate facil¬ 
mente e nel numero desiderato. Contratti. Con il WPL, il linguaggio di 
programmazione dell’Apple Writer, bastano cinque minuti per un do¬ 
cumento di pi’ pagine personalizzato. Gran catalogo. Una routine per 
avere il catalogo del dischetto su due colonne, 42 file per volta, e 
richiamarli con un solo tasto. Lire 30.000 (abbonati 25.000). 

AP3/A06 Equo canone (occorre Visicalc). In Visicalc un modello che 
permette, a inquilini o proprietari, l’esatto calcolo dell’equo canone. 
Lire 25.000 (abbonati 20.000). 


Sistema base - AP3/IN05 

Un data base modulare che ha 
il pregio di costare pochissimo 
e di offrire possibilità operative 
che nemmeno programmi 
di costo molto superiore hanno 


APPLICANDO 4 

AP4/N07 Lettura sprint (versione italiana e versione con frasi in 
inglese). Un reading improver per leggere di più a parità di tempo. 
Rompiquindici. Il piccolo rompicapo delle quindici pedine da ordinare 


nei sedici spazi a disposizione. Tastierino fantasma, una routine per 
avere a disposizione un tastierino numerico anche sull'Apple //. Routi¬ 
ne di input. Due subroutine, una per i dati numerici l’altra per gli 
alfanumerici, per il controllo dell’input. Lire 30.000 (abbonati 25.000). 

AP4/A09 Organo, violino, pianoforte (dischetto Pascal, occorre lan- 
guage card o Apple Ile o Ile). Ecco come, col Pascal, si riesce a 
simulare i tre strumenti attivando l’altoparlante dell’Apple da program¬ 
ma. Lire 30.000 (abbonati 25.000). 

APPLICANDO 5 

AP5/N08 Investor. In tempo reale il quadro esatto di come vanno i 
propri investimenti finanziari. Con cinque prospetti riepilogativi e 52 
periodi di quotazione, Investor è uno dei programmi più completi in 
questo settore e in assoluto il più economico. Lire 70.000 (abbonati 
60.000). 

AP5/N09 Agenda personale. Per ricordare ora per ora gli appunta¬ 
menti di un anno intero memorizzando fino a 15 appunti ogni giorno. 
Duello d’artiglieria. Vince chi sa calcolare meglio la velocità del 
vento, la gittata e l’elevazione della canna. Mele e freccette. Versione 
computerizzata del popolare gioco delle freccette che nulla toglie al 
gusto del far centro. Lire 30.000 (abbonati 25.000). 

Investor - AP5/N08 



Per seguire le azioni in Borsa, con 
grafici, media mobile a 15 e 52 
settimane, medie volume e prezzo 


APPLICANDO 6 

AP6/N10 Obbligazioni/Bond Manager. Per avere un quadro comple¬ 
to e concreto dei rendimenti dei titoli a reddito fisso. PucMan/Nibbler. 
Versione in alta risoluzione per Apple del famoso videogame a getto¬ 
ne. Line finder. Letteralmente trova righe, questa utility permette di 
localizzare facilmente i segmenti di un programma. Lire 30.000 (abbo¬ 
nati 25.000). 

AP6/N11 Stress. In Pascal (occorre language card o Apple Ile o Ile). 
Per giocare, ma soprattutto per inventare giochi, il programma si pone 
in alternativa agli usuali videogame. Lire 55.000 (abbonati 45.000). 


(Continua a pag. 96 ) 
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APPLICANDO 7 



AP7/N12 Apple pittore. Si possono realizzare sullo schermo capola¬ 
vori di pittura, ottenendo effetti speciali di grande efficacia. Ottovolan¬ 
te. Un tutorìal per insegnare ai bambini a riconoscere i numeri che 
rimbalzano sullo schermo. Diskblock. Una routine che permette di 
evitare che qualche curioso possa avere libero accesso in programmi 
riservati. Archivio per Apple. Per avere un back-up dei programmi più 
importanti da dischetto a cassetta o viceversa. Discoteca. Una banca 
dati che tiene sotto controllo la collezione di longplaying e di cassette. 
Aiuto. Alla fine della battitura di un programma, Aiuto vi dirà quanti 
errori ci sono e a quali linee. Lire 30.000 (abbonati 25.000). 

APPLICANDO 8 

AP8/N13 Cambiacomandi/Messaggi. Un programma che insegna 
come personalizzare i messaggi propri del Dos dell’Apple. Le Mans. 
Un gran premio di formula uno da giocare in due o da soli contro il 
computer. Appleorgano. Una combinazione di linguaggio macchina e 
di Applesoft che trasforma l’Apple in un melodioso organo. Lire 30.000 
(abbonati 25.000). 

AP8/T14 Momento di una forza/Colpo all’asta. La dimostrazione 
didattica del ribaltamento di un corpo solido appoggiato a un piano 
quando viene applicata una forza orizzontale che supera il momento in 
senso opposto dovuto al peso. Hard copy pagine in alta risoluzione. 
Se la stampante risponde a determinati criteri di compatibilità, con 
questo programma si possono far miracoli. Lire 30.000 (abbonati 
25.000). 

APPLICANDO 9 

AP9/N15 Fuoco tatuo. Un appassionante adventure game con un 
persorso intricatissimo, mille trabocchetti, un troll e una principessa. 
Apple artista. Per destreggiarsi nella grafica ad alta risoluzione usan¬ 
do lo schermo come tavolozza e la tastiera come pennello. Data hello. 
Una semplice routine che permette di disporre di una clock card 
inizializzando i dischetti con giorno, mese e anno. Lire 25.000 (abbo¬ 
nati 20.000). 

AP9/T16 Sistema di forze parallele. Fissandone l’intensità e la posi¬ 
zione questo programma permette di visualizzare il centro di un siste¬ 
ma di forze sotto forma numerica e grafica. Traslazione e rotazione 
di una figura piana. Come far ruotare, traslare, rimpicciolire, ingrandi¬ 
re sul video una figura piana. Lire 30.000 (abbonati 25.000). 


APPLICANDO 10 

AP10/N14 Ripristino. Come ripristinare programmi persi per un’acci¬ 
dentale istruzione di New o di Fp. Disk Map. Un detective del Dos per 
scoprire dove e come vengono immagazzinati i dati analizzando la 
mappa dei bit occupati. Autonumber. Una routine per autonumerare 
automaticamente i programmi e allineare le linee con un ritorno carrel¬ 
lo in input. Lire 30.000 (abbonati 25.000). 

AP10/T17 Rette nel piano cartesiano. Come individuare in cinque 
modi diversi una coppia di rette in un piano cartesiano e avere visualiz¬ 
zate le equazioni relative ai valori assegnati. Statistica. Come analiz¬ 
zare la correlazione fra due fenomeni o due caratteri e l’indice o 
coefficiente di Bravais che ne effettua la misura. Lire 30.000 (abbonati 
25.000). 

APPLICANDO 11 

API 1/N18 Apple edicola. Una banca dati per avere sotto controllo un 
articolo, il suo numero di pagina, la rivista su cui è stato pubblicato. 
Disk Zap. Il programma indispensabile per il debugging di un dischetto 
che ne risolve la maggior parte dei problemi. Messaggi personali. 
Quando la persona non c’è, per lasciare un messaggio basta impo¬ 
starlo sulla tastiera. L’Apple farà il resto. Comparatore di programmi 
in basic. Una routine per risolvere dubbi sulle diverse versioni di uno 
stesso programma. Trappola per pochi. Un cacciatore contro tre 
animali feroci. Vince chi riesce a intrappolare senza essere intrappola¬ 
to. Lire 30.000 (abbonati 25.000). 

AP11 /TI 9 Espressioni. Come risolvere un piccolo dramma familiare 
con l’aiuto di un elaboratore personale. Lire 25.000 (abbonati 20.000). 


API 2/N20 Bridge. Un programma in altissima risoluzione grafica che 
permette di imparare il bridge o di giocarlo contro il computer. Micro- 
cale. Un foglio elettronico di calcolo, spreadsheet, che mette a disposi¬ 
zione 20 righe per 20 colonne per un totale di 400 caselle da riempire 
come si vuole. Applesoft Line Editor. Una potente utility che permet¬ 
te l’editing dei programmi in Applesoft e aggiunge all’Apple un più 
ampio controllo del cursore. Lire 30.000 (abbonati 25.000). 

AP12/A21 Budget (occorre Appléworks). Un prospetto che con l’inse¬ 
rimento di dati mensili e di medie preventive calcola automaticamente 
le medie consuntive e i relativi saldi mensili e annui. Lire 15.000. 

AP12/A22 Budget (occorre Visicalc). Un prospetto che con l’inseri¬ 
mento di dati mensili e di medie preventive calcola automaticamente le 
medie consuntive e i relativi saldi mensili e annui. Lire 15.000. 

API 2/A23 Cinque modelli Spreadsheet, tre modelli data base, due 
modelli Word Processor. Versione per Appléworks. Due dischetti. Lire 
80.000 (abbonati 70.000). 

API 2/A24 Cinque modelli Spreadsheet. Versione per VISICALC. Lire 
40.000 (abbonati 35.000). 

API 2/T25 Animazione di una rotazione tridimensionale. Un esem¬ 
pio di come una rotazione tridimensionale permette di rappresentare 
gli oggetti proprio come li vediamo. Trasformazione da File a Data. 
Una utility per risolvere il problema di aggiungere a un programma 
preesistente delle istruzioni DATA ricavati da un altro file. Lire 25.000 
(abbonati 15.000). 

APPLICANDO 14 

AP14/N26 Golf. Un programma in altissima risoluzione grafica che 
permette di disegnare il proprio percorso di golf per poi giocarci a 
piacimento con gli amici. Autopiù. Con l’aiuto di questo programma 
non dimenticherete più gli appuntamenti fissi dedicati alla manutenzio¬ 
ne della vostra automobile. Lire 20.000. 

AP14/N27 Applebaby. Tre giochi didattici: il primo per imparare a 
contare in età prescolastica; il secondo per ripassare le tabelline; il 
terzo per esercitarsi nell’ortografia. Lire 20.000. 

API 4/A28 Rimborso spese, (occorre Appléworks). Un prospetto che 
vi permette di preparare le vostre note spese automaticamente in 
cinque minuti. Lire 15.000. 

AP14/A29 Rimborso spese, (occorre VisiCalc). Un prospetto che vi 
permette di preparare le vostre note spese automaticamente in cinque 
minuti. Lire 15.000. 

API 4/T30 Frutteti. Un aiuto a risolvere uno dei più classici problemi di 
estimo. instant Poster Voi scrivete con la tastiera del vostro Apple la 
frase che volete, e subito dalla stampante esce un poster formato 
gigante. Lire 15.000. 

APPLICANDO 15 

AP15/N31 Sintetizzatore di suoni. Con questo programma potete 
dotare i vostri lavori di una colonna sonora eccezionale; permette 
infatti la sintetizzazione dei suoni più diversi: dal canto dell’uccellino, 
alla mitragliatrice, da treno in corsa aN’aereo, e tantissimi altri, compre¬ 
sa la musica. Volano. Un gioco in alta risoluzione per due sfidanti. 
Illustratore. Un programma di grafica che offre la possibilità di realiz¬ 
zare ottimi disegni anche a chi non è troppo ferrato in materia. Auto¬ 
schermo. Crea in automatico videate di presentazione dei programmi 
inseriti in un dischetto; dall’aspetto molto professionale, evidenzia 
infatti i programmi con una barra luminosa comandabile con le frecce e 
fa partire il programma così evidenziato con un semplice Return. Lire 
30.000. 

Sintetizzatore - AP15/N31 k 

Una utility per creare adeguate colonne 
sonore nei vostri programmi. Nel dischetto 
sono già registrati: batteria laser, canti 
di uccelli, esplosioni, canto dei marine, ecc. I 
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AP15/A32 Computer cuisine. Un ricettario computerizzato sul quale 
memorizzare ingredienti e ricette a centinaia, eliminando così sia il 
fastidio di mille pezzetti di carta sparsi per i cassetti, sia il pericolo di 
perdersi preziose ricette. Con possibilità di stampa delle singole ricette 
e un menù completo dei migliori piatti creati da Gualtiero Marchesi, il 
più famoso cuoco d’Italia. Occorre scheda 80 colonne. Lire 20.000. 

AP15/T33 Euclide. Il massimo comun divisore e il minimo comune 
multiplo in un programma che ne permette l'immediata comprensione. 
Isomeri. Fa parte del più ampio progetto americano Seraphim, per lo 
studio della chimica. Lire 15.000. 

APPLICANDO 16 

AP16/N34 Dieta personalizzata. Con questo programma, un pratico 
sistema di Data Base nutrizionale, è possibile personalizzare, a se¬ 
conda della propria costituzione fisica e delle abitudini alimentari, una 
dieta bilanciata, a lungo o a breve termine. Il dischetto contiene un file 
dati di 400 cibi, la cui composizione è analizzata in calorie, proteine, 
grassi, vitamine, colesterolo. Lire 25.000. 

AP16/N35 Designer. Il concetto dei potenti e costosi programmi di 
CAD/CAM alla portata dell’Apple //, per fare del computer uno stru¬ 
mento per disegnare semiprofessionale. Il gioco dei pompieri. E’ 
scoppiato un incendio, e voi siete un pompiere che deve salvare il 
maggior numero di persone prima che muoiano soffocate tra le fiam¬ 
me. Se sbagliate tre volte, sarete nei guai: il severo comandante... Per 
listare bene in vista. Programmare è divertente, creativo, affascinan¬ 
te. Ma talvolta bisogna tornare sul listato per correggere e modificare 
qualcosa. Allora può capitare di pentirsi di aver preferito la compattez¬ 
za alla chiarezza. A meno che non si faccia uso di questo programma. 
Timer. Un efficace programma per trasformare l’Apple // in un fedele e 
preciso contasecondi che avverte del passare del tempo, e al momen¬ 
to giusto... Lire 25.000. 

API 6/N36 Cento One-liner. Utilities, routines, dimostrativi di grafica e 
di suoni, e perfino giochi. Cento programmi su un solo dischetto, tutti 
rigorosamente scritti in una sola linea di Basic. Da usare così come 
sono, da studiare come esempi di sintesi, o da trasferire nei vostri 
programmi. Lire 25.000. 

AP16/N37 Rubrica telefonica. (Occorre AppleWorks). Un’agenda 
telefonica che individua in tempo reale qualunque numero memorizza¬ 
to, che stampa le etichette per spedire gli auguri di Natale e di Pasqua 
solo a chi volete voi, che seleziona, con molteplici possibilità, gruppi di 
nominativi e stampa elenchi su carta da distribuire aggiornati ogni 
mese ai collaboratori. Lire 15.000. 

APPLICANDO 17 

AP17/N38 Strade d’America. Pianifica un qualunque itinerario stra¬ 
dale americano tra ben 171 città diverse, fornendo le sigle delle strade 
da percorrere, l’elenco delle città intermedie e calcola la distanza in 
miglia dei tratti intermedi e la distanza totale dalla città di partenza a 
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Avete un mAC a 128K e volete portarlo a 5I2K ? 


Il sistema grafico per il vostro mAC ! Facilissimo da 
usare vi permette di trasformare qualunque immagine 
in un documento ad alta risoluzione macintosh. Se 
avete, anche solo in parte, acquistato il mAC per le sue 
capacita’ grafiche, non potete fare a meno di 
ThunderScan Fotografie, disegni, mappe, piante 
topografiche, marchi, da originali a colori o in bianco e 
nero, possono essere riprodotti con la precisione di 200 
punti per pollice e con 32 tonalità' di grigio. Andy 
Hertfeld, uno dei realizzatori del software di 
macintosh, ha reso questo strumento estremamente 
semplice e versatile nell’uso. 

Si inserisce al posto della 
cartuccia del nastro nella 
vostra ImageWriter ed e' 
subito pronto a leggere 
qualunque immagine che 
potrete ingrandire sino a 16 
volte o rimpicciolire a 1/16. 


Telefonateci, vi diremo come in pochi giorni e con poca 
spesa potrete finalmente usare tutto quel fantastico 
software che gira solo sul 512K. Tel. 0481/30909 
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Per pianificare qualunque Itinerario 
all'interno degli Stati Uniti. 
Potete scegliere fra 171 città diverse. 
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AP17/A40 I conti del negozio. (Occorre AppleWorks). Diviso in due 
file, simili per impostazione ma diversi per utilizzo, questo modello di 
Spreadsheet è utilissimo per seguire l’andamento giornaliero e mensi¬ 
le di un negozio. All’apertura del negozio coincide l’apertura di un 
foglio vuoto del modello: per ogni movimento di cassa è possibile 
memorizzare la causale, il tipo di pagamento e a cosa si riferisce. Il 
computer calcola i totali per ogni voce e indica quale è stato il movi¬ 
mento di cassa giornaliero, tenendo conto degli ordini e dei saldi per 
impegni precedenti. Un’ultima sezione elabora i dati suddivisi per 
categorie merceologiche e calcola le percentuali di ripartizione degli 
utili su ogni articolo. Lire 50.000. 

AP17/A41 I conti del negozio. (Occorre VisiCalc). Lo stesso di 
AP17/A40, ma con VisiCalc. Lire 50.000. 

APPLICANDO 18 

AP18/N41 Trivia. Stregherà milioni di italiani facendoli giocare, la 
novità che viene daH’America: si chiama Trivial Pursuit ed è destinato a 
diventare il gioco dell’anno. Per sperimentarlo in anteprima, Applican¬ 
do ne propone una versione per Apple //, per di più personalizzabile e 
quindi utile anche per studiare o ripassare, oltre che per divertirsi... 
Bioritmi. Ci sono giornate in cui conviene non uscire nemmeno di 
casa, perché va tutto storto; e ci sono giorni baciati dal destino in cui si 
naviga sull’olio. Sarebbe bello conoscerli in anticipo e organizzarsi 
meglio la vita. Con questo programma si può seguire l’andamento dei 
propri bioritmi: tutti e tre i cicli, mese per mese. Occhio ai consumi. 
Volete sapere quanto consuma la vostra auto? Potete annotare dili¬ 
gentemente la percorrenza e i litri di carburante e poi fare i relativi 
calcoli. Oppure, molto più semplicemente, caricare su Apple questo 
programma, utile per valutare anche altri tipi di consumi... Lire 25.000. 

AP19/N42 Regolatore del bip. Ci sono momenti in cui il //e, con tutti 
quei suoi bip, sembra ridere dei nostri errori. Che fare? Spegnerlo e 
uscire a fare due passi? Cambiarlo con il //c, che ha il volume regolabi¬ 
le? Mettersi i tappi nelle orecchie? No, la soluzione è un’altra, semplice 
e davvero simpatica... e soprattutto funziona! Comparatore di grafici. 
Avere il grafico di una funzione può essere inutile se poi non si 
possono esaminare i particolari del suo andamento in una certa zona. 
Se poi si deve vedere la differenza tra due curve diverse c’è da fare un 
difficile e poco preciso lavoro di comparazione. A meno di non utilizza¬ 
re questo programma che... Impaginatore di messaggi. Peravere le 
scritte perfettamente centrate sia sul video che sulla stampante occor¬ 
re tanta pazienza e tanto occhio. Oppure avere in memoria questo 
impaginatore che, all’occorrenza, può servire anche da word proces¬ 
sor. Utility per ProDOS. Prefix, Subdirectory, Pathname? Sono 
termini che bisogna conoscere per programmare in ProDOS. Questa 
utility non solo aiuterà a capire e imparare con facilità, ma, soprattut¬ 
to... Lire 25.000. 

APPLICANDO 19 

API 9/N42 Oracolo. Comperare una casa? Cambiare lavoro? Conclu¬ 
dere o no quell’affare? Alcune scelte sono così importanti, legate a 
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zate le equazioni relative ai valori assegnati. Statistica. Come analiz¬ 
zare la correlazione fra due fenomeni o due caratteri e l’indice o 
coefficiente di Bravais che ne effettua la misura. Lire 30.000 (abbonati 
25.000). 

APPLICANDO 11 

AP11/NI 8 Apple edicola. Una banca dati per avere sotto controllo un 
articolo, il suo numero di pagina, la rivista su cui è stato pubblicato. 
Disk Zap. Il programma indispensabile per il debugging di un dischetto 
che ne risolve la maggior parte dei problemi. Messaggi personali. 
Quando la persona non c’è, per lasciare un messaggio basta impo¬ 
starlo sulla tastiera. L’Apple farà il resto. Comparatore di programmi 
in basic. Una routine per risolvere dubbi sulle diverse versioni di uno 
stesso programma. Trappola per pochi. Un cacciatore contro tre 
animali feroci. Vince chi riesce a intrappolare senza essere intrappola¬ 
to. Lire 30.000 (abbonati 25.000). 

AP11/TI 9 Espressioni. Come risolvere un piccolo dramma familiare 
con l’aiuto di un elaboratore personale. Lire 25.000 (abbonati 20.000). 


condizioni così complesse, che per decidere tra le alternative possibili, 
l’umana saggezza a volte non basta. Ci vogliono freddezza e distacco, 
per suddividere il problema nelle sue componenti allo scopo di analiz¬ 
zarle separatamente. Il primo programma di tipo decision maker di¬ 
sponibile in Italia. Digger. A differenza dei giochi di labirinto di tipo 
tradizionale, Digger vi chiede di risolvere dei rompicapi spaziali, e la 
prontezza di riflessi non è tra i fattori del gioco... I marziani, inoltre, non 
sono vostri nemici, anzi, i marziani siete voi... Claustrofobia. Non 
distruggete gli alieni, limitatevi a controllare che stiano tranquilli! Que¬ 
sto gioco in alta risoluzione, pacifista nei risultati, ma non nei metodi, 
mette alla prova l’abilità del giocatore, che deve schivare le bombe 
mentre spara contro gli alieni, per incolonnarli con ordine. Ma attenzio¬ 
ne che non vi incastrino, perché soffrite di claustrofobia... Gestione 
puntatori. Volete caricare in memoria un progamma in Applesoft al 
disopra di questo o quel codice in linguaggio macchina? Magari aggi¬ 
rando la memoria di schermo in alta risoluzione? O addirittura in cima a 
un codice ormai servito al suo scopo in un programma che sta giran¬ 
do? O annullare un FP battuto per errore? Con questo programma, 
tutto è possibile. Sei soluzioni. Il programma, proposto nell’ambito del 
Progetto Seraphim, è un test che consiste nel presentare allo studente 
quantità limitate di un certo numero di soluzioni in provette numerate. 
Lo studente conosce le sostanze presenti e deve, usando esclusiva- 
mente le soluzioni a disposizione, identificare il contenuto di ciascuna 
provetta. Lire 30.000. 

APPLICANDO 20 

AP20/N44 Salute. Purtroppo il medico di famiglia non esiste più (ma 
se ce n’è ancora qualcuno, si affretti a usare questo programma!): 
vaccinazioni da un lato, malattie dall’altro, analisi, terapie e soprattutto 
costi a non finire. Come ricordare tutto, registrare e listare le spese 
mediche di tutti i familiari? E al momento di pagare le tasse, poi... 
Variabili. Volete caricare in memoria un programma in Applesoft al di 
sopra di questo o quel codice macchina? O addirittura in cima a un 
codice ormai servito al suo scopo in un programma che sta girando? 
Oppure... Grafica. Che cosa sono le figure a blocco? Perché è impor¬ 
tante farne la conoscenza? Per chi possiede l’Apple //c o il //e con 
scheda 80 colonne continua l’entusiasmante viaggio nel mondo del¬ 
l’altissima definizione. Impariamo in questo numero a duplicare sul 
video la piccola immagine di un’astronave aliena. Simulazione di un 
equilibrio. Eccoci alla terza puntata dedicata al progetto Seraphim. In 
questo numero un software didattico che crea la simulazione al com¬ 
puter di un problema di equilibrio. Lire 25.000. 

AP20/N45 Oroscopo. Dedicato soprattutto a chi agli oroscopi non 
crede, forse questo programma può riuscire a far cambiare loro idea... 
Scientificamente fondato, permette la creazione di una carta del cielo 
natale che nulla invidia ai grafici tracciati dai professionisti. E le tabelle 
con latitudini, longitudini, fusi orari eccetera? Ci sono, ci sono... Voce. 
Ora non gli manca più la parola: con questa routine in linguaggio 
macchina l’Apple può finalmente pronunciare tutto quello che volete. 
Cos’ha di diverso dagli altri programmi del genere? L’estrema sempli¬ 
cità, la totale trasparenza... L.30.000. 


intatti la sintetizzazione dei suoni più diversi: dal canto dell’uccellino.- 
alla mitragliatrice, da treno in corsa all’aereo, e tantissimi altri, compre¬ 
sa la musica. Volano. Un gioco in alta risoluzione per due sfidanti! 
Illustratore. Un programma di grafica che offre la possibilità di realiz¬ 
zare ottimi disegni anche a chi non è troppo ferrato in materia. Auto¬ 
schermo. Crea in automatico videate di presentazione dei programmi 
inseriti in un dischetto; dall’aspetto molto professionale, evidenzia 
infatti i programmi con una barra luminosa comandabile con le frecce e 
fa partire il programma così evidenziato con un semplice Return. Lire 
30.000. 


Sintetizzatore - AP15/N31 

Una utility per creare adeguate colonne 
sonore nei vostri programmi. Nel dischetto 
sono già registrati: batteria laser, canti 
di uccelli, esplosioni, canto dei marine, ecc. 
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è futuro 


Fuji ha messo 
tecnologie del futuro — 
nei floppy disks 


I nuovi floppy disks Fuji Heawy Duty assicurano 
una durata di oltre 20 milioni di passaggi, con 
tracce error-free al 100%. 

Innovativi per la struttura tridimensionale 
flessibile delle particelle magnetiche, 
la modulazione ridottissima, contenuta entro il 3%, 
il Super Hub Ring, parte integrante della 
struttura tridimensionale, e l’involucro resistente 
fino a 60°C, i floppy disks Fuji offrono oggi 
le tecnologie del futuro. ^^s|Éjfp| 
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□ Tre programmi integrati in un unico pacchetto □ Tre volte meno caro, a parità di potenza 

□ Tre strumenti all’unisono □ Tre indiscutibili motivi per acquistarlo 



ARCHÌVIO 

Schedario evoluto e veloce, per¬ 
sonalizzabile. Ricerche multichia- 
ve, sort, aggiornamenti numerici 
automatici, calcolatrice, stampe 
personalizzabili etc. 


GRAFICI 

Tre tipi di grafici: barre, linee, torta 
con personalizzazione di diciture, 
valori e scale 2 o 3 dimensioni. 
Stampe e comparazioni. 


TESTI 

Potentissimo editore di testi con 
righelli, taglia, copia, incolla, giusti¬ 
ficazioni e word-wrap. Passaggio 
dei testi all’archivio per un autenti¬ 
co mail-merge. 


Completamente in italiano - by HL software - Horizontal Line Software 
distribuito da EMS - via Dalmazia,2 - 27029 Vigevano 



















